12 lines
100 B
Text
12 lines
100 B
Text
|
dim a[3, 1, 4, 1, 5, 9]
|
||
|
|
|
||
|
|
arraysize s, a
|
||
|
|
|
||
|
|
for i = 0 to s - 1
|
||
|
|
|
||
|
|
let t = t + a[i]
|
||
|
|
|
||
|
|
next i
|
||
|
|
|
||
|
|
print t / s
|