十数和.txt

来自「简易却实用的编译器」· 文本 代码 · 共 9 行

10 rem calculate add of ten integers
20 input X
30 let n = n + 1
40 let t = t + X
50 if n == 10 goto 70
60 goto 20
70 print t , N
80 end