Bonjour,
En pascal j’utilise la fonction Randomize pour générer des nombres aléatoires, pour générer une suite ou un tableau d’éléments au hasard voici un petit programme :
Une des exécutions donnera par exemple voir image ci-dessous :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15 Program Aleatoire; Procedure hasard(n : Integer); Var k, x : Integer; Begin For k := 1 To n Do Begin x := Random(99)+1; Write(x : 4) End; WriteLn End; Begin Randomize; hasard (15) End.
Ma question svp est la suivante :
Comment générer au hasard un nombre d’éléments parmi la liste ci-dessus ?
Exemple 6 éléments parmi les 15 éléments déjà générés.
D’avance merci.
Partager