Content
Image Gallery
Interest
10 PRINT "INTEREST"
20 PRINT "INITIAL AMMOUNT"
30 INPUT A
40 PRINT AT 0,20;A
50 PRINT "MONTHLY DEPOSIT"
60 INPUT B
70 PRINT AT 1,20;B
80 PRINT "ANNUAL INTEREST"
90 INPUT I
100 PRINT AT 2,20;I
110 LET C=0
120 PRINT "LENGTH OF TIME"
130 INPUT T
140 PRINT AT 3,20;T
150 FAST
160 LET T=T*12
170 LET I=I/100/12+1
180 LET D=A
190 IF C=T THEN GOTO 230
200 LET A=(A+B)*I
210 LET C=C+1
220 GOTO 190
230 PRINT "TOTAL VALUE";TAB 20;A
240 PRINT "TOTAL INVESTMENT";TAB 20;T*B+D
250 PRINT "TOTAL INTEREST";TAB 20;A-(T*B+D)
260 STOP
270 SAVE "1016%2"
280 RUN
People
No people associated with this content.