七数平均值.txt

简易却实用的编译器

10 rem calculate average of seven integers
20 input x
30 rem enter -9999 to stop
35 if x == -9999 goto 60
40 let t = t + x
50 goto 20
60 let t = t / 7
65 print t
70 end