10 REM A humble Model IV program by R. K. Curtis [70160,170]
11 REM This program also runs, as is, on Models I, III, & 100.
20 CLS
30 PRINT "Multiplication Tables Practice"
40 PRINT
50 PRINT "Hit <BREAK> to end."
60 PRINT
70 INPUT "Which times table";N
80 A=VAL(RIGHT$(TIME$,1))
90 A=INT(A+.5)
100 PRINT N;"x";A;"=";
110 INPUT Z$
120 IF VAL(Z$)=N*A THEN PRINT "CORRECT,"; ELSE PRINT "WRONG,";
130 PRINT " the answer is ";
140 PRINT N*A
150 GOTO 80