Lepremier local N S C local j f C:=1 tantque fl C:=C+1 ftantque afficher avant d'ob

De
Publié par

Équipe Académ Lepremier local N,S,C local j,f; C:=1; tantque(fl C:=C+1 ftantque afficher( avant d'ob } :; Lepremier local N,S,C local j,f; saisir(N); S:=0 pour j de 1 C:=1 tantque(f C:=C+1 ftantque S:=S+C fpour f:=S/N afficher( avant d'ob +round(f } :; ique Mathém E Xc 6():={ ; oor(6*rand Le nombre tenir le pr X 6():={ ; jusque N loor(6*ran Le nombre tenir le pr ,2)); atiques xercices d N as (0,1)+1)!= de lancers emier six e cas faire d(0,1)+1)! moyen de emier six e 'algorithm S Le 6 la ombre de 6)faire st : +C); Le 6 la Nombre =6)faire lancers st : Page 1/8 ique en se tatistique premiè lancers premiè moyen d conde : Pro s re fois nécessair A re fois e lancers babilités e es LGOBO ALGOB B t X OX ordeaux - 2009

  • lgobo

  • freq

  • lepremier local

  • fsi fpour

  • jeu de ion

  • ique mathém

  • lancers st

  • premiè lancers


Publié le : lundi 18 juin 2012
Lecture(s) : 34
Source : mathematiques.ac-bordeaux.fr
Nombre de pages : 8
Voir plus Voir moins
Équipe Académ
Lepremier
local N,S,C
local j,f;
C:=1;
tantque(fl
C:=C+1
ftantque
afficher("
avant d'ob
}
:;
Lepremier
local N,S,C
local j,f;
saisir(N);
S:=0
pour j de 1
C:=1
tantque(f
C:=C+1
ftantque
S:=S+C
fpour
f:=S/N
afficher("
avant d'ob
"+round(f
}
:;
mique Mathém
E
Xc
r6():={
C;
oor(6*rand
Le nombre
btenir le pr
X
r6():={
C;
1 jusque N
floor(6*ran
1
Le nombre
btenir le pr
f,2));
atiques
Exercices d
N
cas
d(0,1)+1)!=
e de lancers
remier six e
Xcas
faire
nd(0,1)+1)!
e moyen de
remier six e
d’algorithm
S
Le 6 la
ombre de
=6)faire
s
est : "+C);
Le 6 la
Nombre
=6)faire
lancers
est :
Page
1
/
8
mique en se
Statistique
a premiè
e lancers
a premiè
moyen d
conde : Pro
es
ère fois
nécessair
A
ère fois
de lancers
obabilités e
res
LGOBO
ALGOB
B
et
OX
BOX
ordeaux - 2009
Équipe Académ
Pileouface
local N,F,I
saisir(N);
F:=0;
pour I de
si (floor(
F:=F+
fsi
fpour
freq:=F/N
afficher("
fréquence
sortie de f
+round(fr
}
:;
Pileouface
local N,F,I
saisir(N);
F:=0;
DispG();
ClrGraph
pour I de
si (floor(
F:=F+
fsi
freq:=F/
affichage(
rouge);
affichage(
bleu);
fpour
afficher("
fréquence
sortie de f
+round(fr
}
:;
mique Mathém
Xc
e1():={
I,freq;
1 jusque N
rand(2))==
1
;
Apres "+N
de
face est éga
req,2));
V
Xc
e2():={
I,freq;
h;
1 jusque N
rand(2))==
1
/I;
point(I,freq
point(I,0.5)
Apres "+N
de
face est éga
req,3));
atiques
cas
faire
=1) alors
+" tirages,
le à : "
Visualisat
cas
faire
=1) alors
q),epaisseu
),epaisseur
+" tirages,
le à : "
Jeu de
, la
Jeu de
tion de la
ur_point_2+
r_point_2+
, la
Page
2
/
8
e Pile ou
e Pile ou
stabilisat
+
u Face
A
u Face
tion des f
A
LGOBO
fréquence
LGOBO
B
OX
es
OX
ordeaux - 2009
9
Équipe Académ
boules_1()
local freq,
R := 0;
pour I de
si floor(r
R := R+
fsi
fpour
freq := R/1
afficher(ro
}
:;
boules_2()
local N, fr
saisir(N);
R := 0;
pour I de
si floor(r
R := R+
fsi
fpour
freq := R/N
afficher(ro
}:;
mique Mathém
Xc
):={
, I, R;
1 jusque 10
rand(0,1)+0
+1;
100;
ound(freq,2
Xc
):={
req, I,R;
1 jusque N
rand(0,1)+0
+1;
N;
ound(freq,2
atiques
cas
00 faire
0.4)==0 alor
2));
cas
faire
0.4)==0 alor
2));
Tirage
Échantil
rs
Tirage
Échant
rs
Page
3
/
8
dans un
llon de 10
dans un
illon de N
ne urne
00 tirages
A
ne urne
N tirages
A
LGOBO
LGOBO
B
OX
OX
ordeaux - 2009
Équipe Académ
boules_3()
local N, fr
saisir(N);
R := 0;
DispG();
ClrGraph
pour I de
si floor(r
R := R+
fsi
freq := R
affichage
affichage
fpour
afficher(ro
}
:;
mique Mathém
V
Xc
):={
req, I,R;
h;
1 jusque N
rand(0,1)+0
+1;
/I;
e(point(I,fr
e(point(I,0.
ound(freq,2
atiques
Visualisat
cas
faire
0.4)==0 alor
eq),rouge);
6),bleu);
2));
Tirage
tion de la
rs
Page
4
/
8
dans un
stabilisat
ne urne
tion des f
A
fréquence
LGOBO
B
es
OX
ordeaux - 2009
Équipe Académ
treize():={
local S,I,R
S:=0;
I:=0;
tantque S<
I:=I+1;
R:=floor(
S:=S+R;
ftantque
afficher("
lancers.")
}
:;
mique Mathém
Xc
R;
<13 faire
(6*rand(0,
On atteint
;
atiques
cas
1)+1);
13 en "+I+
+"
Page
5
/
8
Treize
ALGOBO
B
OX
ordeaux - 2009
Équipe Académ
March_Al
local alea,
//alea : val
//x : abscis
//y : ordon
//j : numér
//n : temps
robot
res
essai
//s : temps
robot
res
essais
//m : temp
res
essais
//essais : n
saisir(essa
s := 0;
pour j de 1
n := 0;
x := 0;
y := 0;
tantque a
alea := f
si alea=
fsi
si alea=
fsi
si alea=
fsi
si alea=
fsi
n := n+1
ftantque
s := s+n;
fpour
m := roun
afficher("
le robot re
"+essais+
secondes."
}
:;
mique Mathém
Xc
l
ea() :={
x,y,j,n,s,m,
leur aleatoi
sse du robo
nnee du rob
ro de l'essa
s en second
te sur la ta
s en second
te sur la ta
ps moyen du
te sur la ta
nombre d'es
ais);
1 jusque es
abs(x)<45 e
floor(4*ran
=1 alors x
=2 alors x
=3 alors y
=4 alors y
1;
nd(s/essais,2
Le temps m
este sur la t
" essais est
");
atiques
Ma
cas
,essais;
ire du depl
ot
bot
ai
des durant
able au cour
e durant le
able au cour
urant leque
able au cour
ssais a effec
ssais faire
et abs(y)<4
nd(0,1)+1);
:= x+10;
:= x-10;
:= y+10;
:= y-10;
2);
moyen dura
table au cou
t de : "+m+
arche a
acement
lequel le
rs d'un
equel le
rs des n
el le robot
rs des n
ctuer
5 faire
ant lequel
urs de
+"
Page
6
/
8
aléatoire
du rob
A
bot
LGOBO
B
OX
ordeaux - 2009
9
Équipe Académ
reserve_in
local
n,i,j,nb_ec
nb_echant
compteur:
DispG();
ClrGraph
pour i de 1
n:=0;
pour j de
si rand(
n:=n+1
fsi
fpour
frequenc
affichage(
nt_2+roug
si (freque
alors
compteu
fsi
fpour
affichage(
echantillon
);
affichage(
_echantillo
eu);
affichage(
_echantillo
eu);
afficher("
l'intervalle
}
:;
mique Mathém
Xc
ndienne():=
chantillons,
tillons:=100
:=0;
h;
1 jusque nb
e 1 jusque 1
(0,1)<=0.51
1
ce:=n/132;
point(i,freq
ge);
ence<0.425
ur:=compt
segment(po
ns,0.35)),ep
segment(po
ons,0.425))
segment(po
ons,0.599))
nombre de
e : "+comp
atiques
Visualis
cas
={
,frequence,
00;
b_echantill
132 faire
2 alors
quence),epa
5 ou frequen
eur+1
oint(0,0.35)
paisseur_lig
oint(0,0.425
),epaisseur_
oint(0,0.599
),epaisseur_
e fréquence
pteur);
Réser
sation de
,compteur;
ons faire
aisseur_po
nce>0.599)
),point(nb_
gne_3+vert
5),point(nb
_ligne_3+b
9),point(nb
_ligne_3+b
es hors de
Page
7
/
8
rve ind
l’interva
i
_
t
b
bl
b
bl
ienne
lle de fluc
A
ctuation
LGOBO
B
OX
ordeaux - 2009
Équipe Académ
lievre_tort
local De,T
saisir(N);
G_Tot := 0
pour k de
Tortue :=
De := 0;
tantque T
De := flo
si De ==
G := 0
sinon
Tortue
si Tort
G :=1
fsi
fsi
ftantque
G_Tot :=
fpour
F := round
afficher("
fréquence
}
:;
mique Mathém
Xc
tue():={
ortue,G,N,
0;
1 jusque N
= 0;
Tortue!=6 e
oor(6*alea
= 6 alors
;
e := Tortue+
tue == 6 alo
1;
= G_Tot+G;
d(G_Tot/N,
La tortue g
de "+F);
atiques
cas
,k,G_Tot,F
faire
et De!=6 fa
(0,1))+1;
+1;
ors
;
,2);
gagne avec
Le lièv
;
ire
une
Page
8
/
8
vre et la
a tortue
ALGOBO
B
OX
ordeaux - 2009
Soyez le premier à déposer un commentaire !

17/1000 caractères maximum.