diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /3434/CH14/EX14.9/Ex14_9.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '3434/CH14/EX14.9/Ex14_9.sce')
-rw-r--r-- | 3434/CH14/EX14.9/Ex14_9.sce | 24 |
1 files changed, 24 insertions, 0 deletions
diff --git a/3434/CH14/EX14.9/Ex14_9.sce b/3434/CH14/EX14.9/Ex14_9.sce new file mode 100644 index 000000000..d2f6092d5 --- /dev/null +++ b/3434/CH14/EX14.9/Ex14_9.sce @@ -0,0 +1,24 @@ +clc
+// given data
+
+G=1 //gradient per period in lakh rs
+i=12/100.0 // discount rate
+n=5 // time in years
+A1=10 // payment at end of 1st year in lakhs rs
+loan=40 // load applied for in lakhs
+
+
+AGin=(1/i)-5*1/(-1+(1+i)**n) // gradient to uniform series conversion factor
+
+Ag=A1+G*AGin // in lakhs Rs
+
+Pg=Ag*(-1+(1+i)**n)/(i*(1+i)**n) // present worth in lakhs rs
+
+printf( "The present worth is Rs %.2f Lakh",Pg)
+
+if (Pg*0.85<loan)
+ printf( "\n Loan is not given as amount is less than applied for loan")
+
+else
+printf( "\n Loan is given" )
+end
|