summaryrefslogtreecommitdiff
path: root/659/CH9/EX9.1
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /659/CH9/EX9.1
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '659/CH9/EX9.1')
-rwxr-xr-x659/CH9/EX9.1/exm9_1.sci30
-rwxr-xr-x659/CH9/EX9.1/exm9_1_output.PNGbin0 -> 8889 bytes
2 files changed, 30 insertions, 0 deletions
diff --git a/659/CH9/EX9.1/exm9_1.sci b/659/CH9/EX9.1/exm9_1.sci
new file mode 100755
index 000000000..ecc78b3f3
--- /dev/null
+++ b/659/CH9/EX9.1/exm9_1.sci
@@ -0,0 +1,30 @@
+// Example 9.1
+//Write a program with multiple functions that do not communicate-
+//data between them.
+
+//Function1:printline()
+funcprot(0);
+function []=printline() //contains no argument
+ for i=1:35
+ printf("%c",'-');
+ end
+ printf("\n");
+endfunction
+//Function2: value()
+function []=value() //contains no argument
+ principal=input("Principal amount?");
+ inrate=input("Interest rate?");
+ period=input("Period?");
+ sum1=principal;
+ year=1;
+ //Computation using while loop
+ while(year<=period)
+ sum1=sum1*(1+inrate); //calculates principal amount after certain years
+ year=year+1;
+ end
+ printf("%8.2f %5.2f %5d %12.2f\n",principal,inrate,period,sum1);
+endfunction
+//Calling functions
+printline();
+value();
+printline(); \ No newline at end of file
diff --git a/659/CH9/EX9.1/exm9_1_output.PNG b/659/CH9/EX9.1/exm9_1_output.PNG
new file mode 100755
index 000000000..e0e967664
--- /dev/null
+++ b/659/CH9/EX9.1/exm9_1_output.PNG
Binary files differ