From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 659/CH9/EX9.2/exm9_2.sci | 25 +++++++++++++++++++++++++ 1 file changed, 25 insertions(+) create mode 100755 659/CH9/EX9.2/exm9_2.sci (limited to '659/CH9/EX9.2/exm9_2.sci') diff --git a/659/CH9/EX9.2/exm9_2.sci b/659/CH9/EX9.2/exm9_2.sci new file mode 100755 index 000000000..692ad40e8 --- /dev/null +++ b/659/CH9/EX9.2/exm9_2.sci @@ -0,0 +1,25 @@ +// Example 9.2 +//Modify Example 9.1 to include arguments in function calls. + +funcprot(0); +function []=printline(ch) //function with argument ch + for i=1:52 + printf("%c",ch); + end + printf("\n"); +endfunction +function []=value(p,r,n) //function with argument p,r,n + sum1=p; + year=1; + while(year<=n) + sum1=sum1*(1+r); + year=year+1; + end + printf("%f\t%f\t%d\t%f\n",p,r,n,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"); //read from standard input +//Calling functions +printline('z'); +value(principal,inrate,period); +printline('c'); \ No newline at end of file -- cgit