apl>" <------------------------- sam154.txt ----------------------------> apl>a # 1 10 R ' a#r ci t ' apl>a # a,[1] ' a#(1+r)*t' apl>Lfx a ci apl>1000 X (.05%4) ci 7X4 1415.992 apl>a # 1 50 R ' invest;c;r;t;f ' apl>a # a,[1] ' ''enter capital amount in dollars'' ' apl>a # a,[1] ' c#L ' apl>a # a,[1] ' ''enter number of times compounded in one year'' ' apl>a # a,[1] ' f#L ' apl>a # a,[1] ' ''enter annual interest rate in per cent'' ' apl>a # a,[1] ' r#L%fX100 ' apl>a # a,[1] ' ''enter period in years'' ' apl>a # a,[1] ' t#fXL ' apl>a # a,[1] ' ''value is '',FcXr ci t ' apl>Lfx a invest apl>invest enter capital amount in dollars L:L#1000 1000 enter number of times compounded in one year L:L#4 4 enter annual interest rate in per cent L:L#5 5 enter period in years L:L#7 7 value is 1415.992 apl>)off