mirror
/
RosettaCodeData
mirror of https://github.com/acmeism/RosettaCodeData.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity
RosettaCodeData/Task/Loops-Do-while/Sinclair-ZX81-BASIC/loops-do-while-1.basic

5 lines
69 B
Plaintext
Raw Permalink Blame History

10 LET X=0
20 LET X=X+1
30 PRINT X
40 IF X/6<>INT (X/6) THEN GOTO 20
Reference in New Issue View Git Blame Copy Permalink