|
Apprendre Maple Site dédié au logiciel de calcul formel Maple
|
Voir le sujet précédent :: Voir le sujet suivant |
Auteur |
Message |
lucie Invité
|
Posté le: 19 Avr 2004 1:00 Sujet du message: série aléatoire |
|
|
j'ai programmé une série aléatoire de 12 nombres compris entre 0 et 11 avec la fonction rand:
for k from 0 to 11 do die:=rand(0..11):
> die();k:=k od;
mais je veux que tous les chiffres de ma série soient différents !!
comment je peux faire ???
Merci... |
|
Revenir en haut de page |
|
|
ALS Invité
|
Posté le: 19 Avr 2004 7:33 Sujet du message: Série aléatoire |
|
|
L'astuce consiste à utiliser un tableau auxiliaire U de "drapeaux" initialisés à 0 . Dès qu'un nb a a été choisi au hasard, on met U[a] à 1.
La procédure hasard rend une liste T de n nombres différents choisis au
hasard entre 1 et n:
Code: |
> hasard:=proc(n::posint)
> local die,i,a,T,U;
> T:=array(1..n):U:=array(1..n):
> for i to n do T[i]:=-1:U[i]:=0 end do;
> for i to n do
> while T[i]<0 do
> die:=1+rand(n):
> a:=die():
> if U[a]=0 then
> T[i]:=a :U[a]:=1
> end if
> end do
> end do;
> convert(T,list);
> end proc:
>
> hasard(12);
[7, 9, 4, 2, 1, 3, 12, 8, 10, 11, 5, 6]
|
A bientôt |
|
Revenir en haut de page |
|
|
lucie Invité
|
Posté le: 19 Avr 2004 21:58 Sujet du message: série aléatoire |
|
|
Merci beaucoup !!!!
c'est tout à fait ce que je voulais, je n'aurais jamais trouvé toute seule !
je pense d'ailleurs que ce ne sera pas mon premier et dernier message !
encore merci... |
|
Revenir en haut de page |
|
|
|
|
Vous ne pouvez pas poster de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas voter dans les sondages de ce forum
|
Développé par phpBB © 2001, 2006 phpBB Group
Traduction par : phpBB-fr.com
Apprendre Maple - ©
- Alain Le Stang - Navigation optimisée pour une résolution 1024 x 768.
|