RosettaCodeData/Task/Integer-sequence/BASIC/integer-sequence-1.basic

5 lines
53 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
10 LET A = 0
20 LET A = A + 1
30 PRINT A
40 GO TO 20