Discussion :

[tickerdu22]

bonjour je suis un déutant en pascal et j'aimerais savoir s'il y a une fonction en pascal qui permet de choisir au hasard un nombre dans un intervalle donné par l'utilisateur

[droggo]

Jui,

Oui, ça s'appelle Random. Je te laisse regarder dans l'aide/docs/cours pour savoir comment l'utiliser.

[darrylsite]

tu auras aussi besion de randomize pour eviter de generer les meme nombres à chaque fois. Tu dois l' utiliser bien avant le randomize.

[dot-_-net]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
randomize;
t:=random(100);

[zizo89]

si tu veux par exemple de faire random avec un entier 5<20< alors tu dois faire comme suit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Randomize;
n:=Random(15)+4;

la moindre valeur est 4 et le maximum est 19

[zizo89]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Procedure Saisie(var n:integer);
begin
randomize;
n:=random(15)+4;
end;

[krachik]

Bonjour
Sans voir le code mais en lisant seulement le titre je dirai que "une procedure qui saisie un nombre avec random "?
Plutot que d'utiliser un style gras pour ton code ça serait plus lisible d'utiliser les balises code (# dans l'editeur)
Je ne vois pas trop l'utilité de faire une procedure pour ça et encore moins de mettre un "randomize" dans la procedure,?
C'est bien les exemples mais l'auteur du post lui en est ou?
@+

[droggo]

Gio,

si tu veux par exemple de faire random avec un entier 5<20< alors tu dois faire comme suit

Randomize;
n:=Random(15)+4;

la moindre valeur est 4 et le maximum est 19

Random(n) renvoie une valeur de 0 à n-1.

Donc Random(15)+4; renvoie de 0+4 = 4 à 14+4 = 18, ça ne correspond donc pas à ce que tu sembles avoir voulu dire avec un "entier 5<20<", qui est d'ailleurs incompréhensible.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Procedure Saisie(var n:integer);
begin
randomize;
n:=random(15)+4;
end;

Il est temps d'apprendre que les fonctions existent.