Math Test
1 REM "TEST"
5 RAND
10 LET S=0
15 FOR I=1 TO 20
20 CLS
25 LET M=7+INT (RND*11)
30 LET N=5+INT (RND*11)
35 PRINT "QUESTION ";I
40 PRINT
45 PRINT M; " * "; N; "=";
50 INPUT Q
55 PRINT M*N
60 IF Q=M*N THEN PRINT "WELL DONE"
65 IF Q=M*N THEN LET S=S+1
70 PAUSE 100
75 NEXT I
80 CLS
85 PRINT "SCORE "; S; " /20"
90 SAVE "1022%1"
95 RUN
People
No people associated with this content.