21 lines
514 B
Plaintext
21 lines
514 B
Plaintext
Name : MULT.
|
|
Length : $0124 (292)
|
|
Load at : $0801 (2,049)
|
|
|
|
10 HOME
|
|
20 PRINT "THIS PROGRAM WILL MULTIPLY ANY TWO NUMBERS."
|
|
30 PRINT "ENTER ANY NUMBER..."
|
|
40 INPUT A
|
|
50 PRINT "ENTER ANY NUMBER..."
|
|
60 INPUT B
|
|
70 PRINT "HOW MUCH IS "A"*"B"?"
|
|
80 INPUT C
|
|
90 IF C = A * B THEN
|
|
PRINT "CORRECT! DO YOU WANT TO TRY AGAIN? "
|
|
100 IF C < > A * B THEN
|
|
PRINT "WRONG.DO YOU WANT TO TRY AGAIN?"
|
|
110 INPUT A$
|
|
120 IF A$ = "YES" THEN
|
|
GOTO 10
|
|
130 END
|