summaryrefslogtreecommitdiff
path: root/2870/CH7/EX7.23/Ex7_23.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2870/CH7/EX7.23/Ex7_23.sce
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 '2870/CH7/EX7.23/Ex7_23.sce')
-rwxr-xr-x2870/CH7/EX7.23/Ex7_23.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/2870/CH7/EX7.23/Ex7_23.sce b/2870/CH7/EX7.23/Ex7_23.sce
new file mode 100755
index 000000000..5fcbaf2c3
--- /dev/null
+++ b/2870/CH7/EX7.23/Ex7_23.sce
@@ -0,0 +1,16 @@
+clc;clear;
+//Example 7.23
+
+//given data
+P1=85.6;
+P2=985.6;
+P2r=885.6;
+CC=12000;//current cost
+
+//constants used
+n=1.4;
+
+//calulation
+freduction=1-(((P2r/P1)^((n-1)/n)-1)/((P2/P1)^((n-1)/n)-1));
+CS=CC*freduction;
+disp(round(CS),'cost savings in Dollar/yr')