Listing of file='FUVAL.BAS;01' on disk='vmedia/ncc_8_real-sector.ccvf'
9 PLOT 12 10 PRINT TAB( 20) "FUTURE VALUE OF REULAR DEPOSITS" 18 PLOT 6,28,14 20 PRINT "REGULARLY DEPOSITED AMOUNT "; 40 INPUT R 50 PRINT "NOMINAL INTEREST RATE "; 60 INPUT I 70 PRINT "NUMBER OF DEPOSITS EACH YEAR "; 80 INPUT N 90 PRINT "HOW MANY YEARS "; 100 INPUT Y 110 I= I/ N/ 100 120 T= R* ((1+ I)^ (N* Y)- 1)/ I 126 PRINT 127 PLOT 6,2 128 PRINT SPC( 20)"FUTURE VALUE = $" ;INT (T* 100+ .5)/ 100:REM 130 PLOT 6,2 140 PRINT :PRINT :PRINT 150 PLOT 15,6,2 160 PRINT "HAVE YOU GOT ANOTHER SAVINGS PLAN IN MIND ?? ( 1=YES, 0=NO "; 170 INPUT X 190 IF X = 1 THEN 9 200 PLOT 1