5 lines
78 B
Text
5 lines
78 B
Text
A=0
|
|
REPEAT
|
|
A=A+1
|
|
PRINT(A)
|
|
UNTIL A MOD 6=0 !UNTIL A-6*INT(A/6)=0 for C-64
|