diff options
Diffstat (limited to '2471/CH2/EX2.5/Ex2_5.sce')
-rwxr-xr-x | 2471/CH2/EX2.5/Ex2_5.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/2471/CH2/EX2.5/Ex2_5.sce b/2471/CH2/EX2.5/Ex2_5.sce new file mode 100755 index 000000000..8427acf5f --- /dev/null +++ b/2471/CH2/EX2.5/Ex2_5.sce @@ -0,0 +1,20 @@ +clear ;
+clc;
+// Example 2.5
+printf('Example 2.5\n\n');
+printf('Page No. 49\n\n');
+
+// given
+F= 10*10^3;// fuel oils in gallons
+Cs= 2200;// cost of maintaining tanks per year in Pound
+Ci= 1850;// cost of insulation of pipe in Pound
+
+As= (Cs*.85);//company saving is 85 per cent to the cost
+printf('Annual Saving on heating is %3.0f Pound\n',As)
+
+
+if(As> Ci) then
+disp("The investment has a pay-back period of less than 1 year");
+else
+disp("The investment has not a pay-back period of less than 1 year");
+end
|