9 lines
75 B
Text
9 lines
75 B
Text
|
:1->C
|
||
|
|
:While 1
|
||
|
|
:Prompt I
|
||
|
|
:C->dim(L1)
|
||
|
|
:I->L1(C)
|
||
|
|
:Disp mean(L1)
|
||
|
|
:1+C->C
|
||
|
|
:End
|