RosettaCodeData/Task/Infinity/ZX-Spectrum-Basic/infinity-2.zx
2018-06-22 20:57:24 +00:00

4 lines
47 B
Text

10 LET z=1
20 PRINT z
30 LET z=z*2
40 GO TO 20