RosettaCodeData/Task/100-doors/Smart-BASIC/100-doors.basic
2023-07-01 13:44:08 -04:00

9 lines
105 B
Text

x=1!y=3!z=0
PRINT "Open doors: ";x;" ";
DO
z=x+y
PRINT z;" ";
x=z
y=y+2
UNTIL z>=100
END