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

---
 1682/CH4/EX4.2/Exa4_2.sce | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100755 1682/CH4/EX4.2/Exa4_2.sce

(limited to '1682/CH4/EX4.2/Exa4_2.sce')

diff --git a/1682/CH4/EX4.2/Exa4_2.sce b/1682/CH4/EX4.2/Exa4_2.sce
new file mode 100755
index 000000000..0ebbf6021
--- /dev/null
+++ b/1682/CH4/EX4.2/Exa4_2.sce
@@ -0,0 +1,24 @@
+//Exa 4.2
+clc;
+clear;
+close;
+//Bid 1: Alpha Elevator Inc.
+disp("Bid 1: Alpha Elevator Inc. ");
+P=450000;//in Rs
+A=27000;//in Rs
+i=15;//in % per annum
+n=15;//in years
+//Formula : (P/A,i,n)=(((1+i/100)^n)-1)/((i/100)*(1+i/100)^n)
+PW=P+A*(((1+i/100)^n)-1)/((i/100)*(1+i/100)^n);//in RS
+disp(PW,"The present worth for this bid in RS. : ");
+
+//Bid 2: Beta Elevator Inc.
+disp("Bid 2: Beta Elevator Inc. ");
+P=540000;//in Rs
+A=28500;//in Rs
+i=15;//in % per annum
+n=15;//in years
+//Formula : (P/A,i,n)=(((1+i/100)^n)-1)/((i/100)*(1+i/100)^n)
+PW=P+A*(((1+i/100)^n)-1)/((i/100)*(1+i/100)^n);//in RS
+disp(PW,"The present worth for this bid in RS. : ");
+disp("The total present worth cost of bid 1 is less than that of bid 2. Hence bid 1 is to be selected for implementation. That is, the Elevator from Alpha Elevator Inc. is to be purchased and installed in the new building.");
\ No newline at end of file
-- 
cgit