Programme sur des probabilités
Alors je voilà je rencontre un petit problème sur un programme à des endroits je suis blouqé!
D'abord voici l'énoncé...
on lance une pièce
pour k€N*, Xk une variable qui vaut 1 quand le keme lancer amène Pile et 0 sinon.Construire un programme en turbo pascal afin qu'il simule les m varaibles X1,X2,...Xm(dont les valeurs seront placées dans le tableau X) et détermine les valeurs de N1,N2,..,Nm(qui seront stockées dans le tableur N)
-m étant une valeur entiere, inférieure à 100,entrée par l'utilisateur
-On note Nn le nombre de série lors des n premiers lancé (on va s'intéresser aux succession de lancers amenant un même côté)
Voici mon programme incomplet...
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
program simulation;
type suite=array[1..100]of integer;
var X, N :suite;
m;i:integer;
begin
readln(m)
randomize;
X[1]:= ;N[1]:= ;
for i:=2 to m do begin
X[i]:=
end
end. |
je pense que j'ai dû oublier une ou eux lignes et et les valeurs de X[1] et N[1]
voilà mercie d'avance pour votre aide