You cannot select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
13 lines
397 B
Racket
13 lines
397 B
Racket
#lang br/demo/basic
|
|
|
|
REM program listing from
|
|
REM http://www.vintage-basic.net/bcg/change.bas
|
|
|
|
2 PRINT TAB(33);"CHANGE"
|
|
4 PRINT TAB(15);"CREATIVE COMPUTING MORRISTOWN, NEW JERSEY"
|
|
5 PRINT:PRINT:PRINT
|
|
6 PRINT "I, YOUR FRIENDLY MICROCOMPUTER, WILL DETERMINE"
|
|
8 PRINT "THE CORRECT CHANGE FOR ITEMS COSTING UP TO $100."
|
|
9 PRINT:PRINT
|
|
10 PRINT "COST OF ITEM":INPUT A:PRINT "AMOUNT OF PAYMENT":INPUT P
|