10 COM N$[72],F$[72],I,Q,P,C5,W,Q1,N,A,F,T5 20 GOTO 60 30 CHAIN "$BLINK5" 40 REM PROGRAM NAME = BLINKM, GENERATES PROBLEMS 50 REM CHAINED TO BLINKY,BLINKD,BLINKP,BLINK2,BLINK3,BLINK5,BLINK6 60 LET N=A=F=0 70 REM THIS PROGRAM GENERATES PROBLEMS 80 REM CHAINED TO BLINK5 90 LET F=INT(6*RND(1)+1) 100 LET A=INT(5*RND(1)+2) 110 LET N=INT(50*RND(1)+1) 120 GOTO Q OF 130,160,210 130 LET A=INT(4*RND(1)+6) 140 LET Q1=1 150 GOTO 30 160 IF N>40 THEN 190 170 IF N<10 THEN 190 180 GOTO 110 190 LET Q1=2 200 GOTO 30 210 IF N<6 THEN 240 220 IF N>44 THEN 240 230 GOTO 110 240 LET Q1=3 250 GOTO 30 260 END