Bonjour j'ai quelques difficultés à faire marcher mon code:
Je souhaite créer une liste de n éléments aléatoirement ordonnés, de chiffre compris entre 0 et n
Mon code boucle, si quelqu'un a une piste ou quelques modifications à me proposer ?... Merci à vous !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 let alea n = let rec creationlist l = let x= Random.int n in if (List.mem !x l ) then creationlist l else begin if (List.length l>n) then l else creationlist (!x::l) end in creationlist [] ;;
Partager