Tryag File Manager
Home
||
Turbo Force
||
B-F Config_Cpanel
Current none :
/
usr
/
share
/
doc
/
bc
/
examples
/
Or
Select Your none :
Upload File :
New :
File
Dir
//usr/share/doc/bc/examples/ckbook.b
scale=2 print "\nCheck book program!\n" print " Remember, deposits are negative transactions.\n" print " Exit by a 0 transaction.\n\n" print "Initial balance? "; bal = read() bal /= 1 print "\n" while (1) { "current balance = "; bal "transaction? "; trans = read() if (trans == 0) break; bal -= trans bal /= 1 } quit