summaryrefslogtreecommitdiff
path: root/1682/CH4/EX4.1/Exa4_1.sce
blob: b8b74c61d15ce8b77af1bcdde50a526c76513fc3 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
//Exa 4.1
clc;
clear;
close;
//Technology 1 :
disp("Technology 1 : ");
P=1200000;//in Rs
A=400000;//in Rs
i=20;//in % per annum
n=10;//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 technology in RS. : ");

//Technology 2 :
disp("Technology 2 : ");
P=2000000;//in Rs
A=600000;//in Rs
i=20;//in % per annum
n=10;//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 technology in RS. : ");

//Technology 3 :
disp("Technology 3 : ");
P=1800000;//in Rs
A=500000;//in Rs
i=20;//in % per annum
n=10;//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 technology in RS. : ");
disp("It is clear from the calculations that the present worth of technology 2 is the highest among all technologies. Therefore technology 2 is suggested for implementation to expand the production.");