1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
// Example 9.3
//Modify Example 9.2's function value() to return result and extend versatility of the function
//printline by taking the lenth of line as an argument
function []=printline(ch,len)
for i=1:len
printf("%c",ch);
end
printf("\n");
endfunction
function [amount]=value(p,r,n) //returns amount
sum1=p;
year=1;
while(year<=n)
sum1=sum1*(1+r);
year=year+1;
end
amount=sum1;
endfunction
printf("Enter principal amount,interest rate,and period\n[Enter in single line seperated by space]");
[principal,inrate,period]=scanf("%f %f %d");
//Calling functions
printline('*',52);
amount=value(principal,inrate,period);
printf("%f\t%f\t%d\t%f\n",principal,inrate,period,amount);
printline('=',52);
|