random

random - Delphi/Pascal - Programmation

Marsh Posté le 19-03-2004 à 20:34:33    

bonjour,
 
(XP Celeron 1.7 GHz Delphi6 - mes premiers essais en Pascal)
Random me donne toujours: 0, 3, 86,...
la même séquence...
Pire , si je mets trunc(random(101))
dans une   boucle while la commande semble être réinitialisée à chaque boucle . soit 0, 0, 0./.
D'où vient le pb...et que faire pour générer un véritable alea
 
merci
 
--
steph

Reply

Marsh Posté le 19-03-2004 à 20:34:33   

Reply

Marsh Posté le 19-03-2004 à 23:24:31    

Y a pas une fonction Randomize à appeler au début du programme ?


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 20-03-2004 à 01:01:47    

A priori,(intégrée au langage) 'random' est appelée dans la procédure selon la syntaxe indiquée dans ma doc.Mais si tu m'en dis plus
je vais essayer.
Merci

Reply

Marsh Posté le 20-03-2004 à 11:11:10    

Description
 
La procédure Randomize initialise le générateur interne de nombres aléatoires avec une valeur aléatoire (obtenue àpartir de l'horloge du système).Le générateur de nombres aléatoires doit être initialiséen appelant Randomize ou en affectant une valeur àRandSeed.
 
Ne combinez pas l'appel àRandomize dans une boucle avec les appels àla fonction Random.Normalement,Randomize n'est appelée qu'une seule fois,avant tout appel àRandom.

Reply

Marsh Posté le 20-03-2004 à 15:19:48    

begin  
randomize;
Ca fonctionne
Merci

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed