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


10 DEFINT A-Z
20 FOR I=1 TO 100
30 IF I=1 THEN PRINT "  1";: GOTO 70
40 FOR J=I-1 TO 1 STEP -1
50 IF I MOD J=0 THEN PRINT USING "###";J;: GOTO 70
60 NEXT J
70 IF I MOD 10=0 THEN PRINT
80 NEXT I