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

10 lines
125 B
Text

READ x,y,z
PRINT "Open doors: ";x;" ";
CYCLE
z=x+y
PRINT z;" ";
x=z
y=y+2
REPEAT UNTIL z>=100
DATA 1,3,0
END