打印最大数.txt

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

10 rem calculate the max
20 input t
25 input X
30 let n = n + 1
40 if y <= x goto 50
45 goto 53
50 let y = 1 + x - 1
53 if n == t goto 60
55 goto 25
60 print y
70 end