home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1988 November / Ahoy_Magazine_88-11_1988_Double_L.d64 / Written REM 1 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  401 b   |  13 lines
  1. 1 rem ==================================
  2. 2 rem    commodares problem #54-3 :
  3. 3 rem       written remainder
  4. 4 rem    solution by
  5. 5 rem       dr. dave marquis
  6. 6 rem ==================================
  7. 10 input"[147]what is the number to be divided";a
  8. 20 input"what is the divisor";b
  9. 30 c=a/b
  10. 40 print""a"/"b" ="int(c)", remainder"int((c-int(c))*b+.1)
  11. 50 input"another division problem (y/n)";a$
  12. 60 if a$="y" then 10
  13.