Code
:ClrHome
:Menu("STATS","CALCULER",1,"AIDE",2,"QUITTER",3)
:Lbl 2
:Output(2,1,"ENTRER LA SERIE")
:Output(4,2,"DANS L1 ET LES")
:Output(6,4,"EFFECTIFS")
:Output(8,5,"DANS L2")
:Pause
:Goto 3
:Lbl 1
:ClrList L3,L4,L5,L6
:L2*L1 -> L3
:Sum (L2) -> A
:Sum (L3)/A -> B
:L1-B -> L4
:L4² -> L5
:L2*L5 -> L6
:Sum (L6)/A -> C
:[racine carrée de](C) -> D
:Disp "MOYENNE",B
:Disp "VARIANCE",C
:Disp "ECART TYPE",D
:ClrList L3,L4,L5,L6
:Pause
:Lbl 3
:ClrHome