11 lines
100 B
Text
11 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
|