// xcas version=0.8.6 fontsize=14 font=0 currentlevel=0 // fltk 7Fl_Tile 11 56 998 274 14 0 [ // fltk N4xcas7EditeurE 11 56 998 216 14 0 232 , kangourou(n):={ S:=0; pour j de 1 jusque n faire A:=0; passage:=0; pour k de 1 jusque 1000 faire si rand(0,1)<0.5 alors A:=A-1; sinon A:=A+1; fsi si A==0 alors passage:=passage+1; fsi fpour S:=S+passage; fpour print(evalf(S/n))} :;, // fltk N4xcas10Log_OutputE 11 272 998 38 14 0 // Parsing kangourou£// Warning: j,A,passage,k, declared as global variable(s) compiling kangourou£ , // fltk N4xcas8EquationE 11 310 998 20 14 0 1 "Done" ] , // fltk 7Fl_Tile 11 332 998 80 14 0 [ // fltk N4xcas19Multiline_Input_tabE 11 332 998 22 14 0 kangourou(10) , // fltk N4xcas10Log_OutputE 11 354 998 38 14 0 22.3£Evaluation time: 2.953£ , // fltk N4xcas8EquationE 11 392 998 20 14 0 1 1 ] // context 2676 giac archive 7 0 13 8 0 0 'cas_setup' 7 0 11 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 7 0 2 1 »½×Ùß|Û= 1 V瞯Ò< 0 12 0 7 0 4 0 1 0 0 50 0 0 0 0 0 25 0 0 0 0 0 1 0 0 0 0 8 0 0 'xyztrange' 7 0 16 1 $À 1 $@ 1 $À 1 $@ 1 $À 1 $@ 1 $À 1 $@ 1 $À 1 $@ 1 ffffffö¿ 1 š™™™™™ñ? 0 1 0 1 1 ð? 0 1 0 7 0 0 7 0 0 8 0 15 7 0 2 0 -24 0 6 1 A 8 0 15 7 0 2 0 223 0 6 1 S 8 0 15 7 0 2 0 11 0 6 1 j 8 0 15 7 0 2 0 1001 0 6 1 k 8 0 15 7 0 2 8 0 0 program 7 0 3 7 1 1 6 1 n 0 10 0 7 0 3 8 0 15 7 0 2 0 0 0 6 1 S 8 0 -1 pour 7 0 4 8 0 15 7 0 2 0 1 0 6 1 j 8 0 36 7 0 2 6 1 j 6 1 n 8 0 15 7 0 2 8 0 1 7 0 2 6 1 j 8 0 10 0 1 0 6 1 j 8 0 0 'bloc' 7 0 4 8 0 15 7 0 2 0 0 0 6 1 A 8 0 15 7 0 2 0 0 0 6 7 passage 8 0 -1 pour 7 0 4 8 0 15 7 0 2 0 1 0 6 1 k 8 0 36 7 0 2 6 1 k 0 1000 0 8 0 15 7 0 2 8 0 1 7 0 2 6 1 k 8 0 10 0 1 0 6 1 k 8 0 0 'bloc' 7 0 2 8 0 -1 si 7 0 3 8 0 35 7 1 2 8 0 0 'alea' 7 1 2 0 0 0 0 1 0 1 à? 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 8 0 2 0 1 0 6 1 A 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 0 1 0 6 1 A 8 0 -1 si 7 0 3 8 0 0 '==' 7 1 2 6 1 A 0 0 0 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 7 passage 0 1 0 6 7 passage 6 5 undef 8 0 15 7 0 2 8 0 1 7 0 2 6 1 S 6 7 passage 6 1 S 8 0 0 print 8 0 0 'evalf' 8 0 5 7 0 2 6 1 S 6 1 n 6 9 kangourou 8 0 15 7 0 2 8 0 0 program 7 0 3 7 1 0 7 0 0 8 0 42 7 0 2 7 1 3 6 1 A 6 1 k 6 7 passage 7 0 4 8 0 15 7 0 2 0 0 0 6 1 A 8 0 15 7 0 2 0 0 0 6 7 passage 8 0 -1 pour 7 0 4 8 0 15 7 0 2 0 1 0 6 1 k 8 0 36 7 0 2 6 1 k 0 1000 0 8 0 15 7 0 2 8 0 1 7 0 2 6 1 k 8 0 10 0 1 0 6 1 k 8 0 0 'bloc' 7 0 2 8 0 -1 si 7 0 3 8 0 35 7 1 2 8 0 0 'alea' 7 1 2 0 0 0 0 1 0 1 à? 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 8 0 2 0 1 0 6 1 A 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 0 1 0 6 1 A 8 0 -1 si 7 0 3 8 0 0 '==' 7 1 2 6 1 A 0 0 0 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 7 passage 0 1 0 6 7 passage 6 5 undef 8 0 0 print 6 7 passage 6 17 kangourou_partiel 8 0 15 7 0 2 0 33 0 6 7 passage 8 0 15 7 0 2 8 0 0 program 7 0 3 7 1 0 7 0 0 8 0 42 7 0 2 7 1 3 6 1 A 6 1 k 6 1 p 7 0 4 8 0 15 7 0 2 0 0 0 6 1 A 8 0 15 7 0 2 0 0 0 6 1 p 8 0 -1 pour 7 0 4 8 0 15 7 0 2 0 1 0 6 1 k 8 0 36 7 0 2 6 1 k 0 1000 0 8 0 15 7 0 2 8 0 1 7 0 2 6 1 k 8 0 10 0 1 0 6 1 k 8 0 0 'bloc' 7 0 2 8 0 -1 si 7 0 3 8 0 35 7 1 2 8 0 0 'alea' 7 1 2 0 0 0 0 1 0 1 à? 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 8 0 2 0 1 0 6 1 A 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 A 0 1 0 6 1 A 8 0 -1 si 7 0 3 8 0 0 '==' 7 1 2 6 1 A 0 0 0 8 0 0 'bloc' 7 0 1 8 0 15 7 0 2 8 0 1 7 0 2 6 1 p 0 1 0 6 1 p 6 5 undef 8 0 0 print 6 1 p 6 4 prog 8 0 0 'xcas_mode' 0 0 0