RosettaCodeData/Task/Infinity/ZX-Spectrum-Basic/infinity-2.basic
2023-07-01 13:44:08 -04:00

4 lines
47 B
Text

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