-1 REM 10 X = 1 5 REM 20 GOTO 100 35 GOSUB 200 65 IF X THEN 1000