10 REM *** WRITTEN BY DAVID AHL, DIGITAL
15 REMARKABLY TRANSLATED TO OS8 BASIC BY KAY R. FISHER ...DEC
20 PRINT"BOOMERANG PUZZLE FROM ARITHMETICA OF NICOMACHUS -- A.D. 90!"
30 PRINT\PRINT"PLEASE THINK OF A NUMBER BETWEEN 1 AND 100."\PRINT
40 PRINT"GOT IT?     O.K. LET'S START....."
50 PRINT "YOUR NUMBER DIVIDED BY 3 HAS A REMAINDER OF";
55 INPUT A
60 PRINT "YOUR NUMBER DIVIDED BY 5 HAS A REMAINDER OF";
65  INPUT B
70 PRINT "YOUR NUMBER DIVIDED BY 7 HAS A REMAINDER OF";
75 INPUT C
80 PRINT\PRINT"LET ME THINK A MOMENT"\D=70*A+21*B+15*C
90 IF D=<105 GOTO 110\D=D-105
100 GOTO 90
110 PRINT\PRINT"YOUR NUMBER WAS";D;", RIGHT";\INPUT A$\PRINT
120 IF A$="YES" THEN 150 \ IF A$="NO" THEN 160
140 PRINT"EH?  I DON'T UNDERSTAND '";A$;"'.  TRY 'YES' OR 'NO'."\GOTO 110
150 PRINT "HOW ABOUT THAT!!"\GOTO 170
160 PRINT "I FEAR YOUR ARITHMETIC IS IN ERROR."
170 PRINT\PRINT\PRINT\PRINT "LET'S TRY ANOTHER."\GOTO 30\END