Task
a(1) = 1; for n > 1, a(n) = largest proper divisor of n, where n < 101 .


10 PRINT 1;
20 FOR I = 1 TO 101
30 FOR D = I\2 TO 1 STEP -1
40 IF I MOD D = 0 THEN PRINT D; : GOTO 60
50 NEXT D
60 NEXT I