summaryrefslogtreecommitdiff
path: root/3434/CH14/EX14.14/Ex14_14.sce
blob: f46110352b70cc7c5385abbf779836ca244f909f (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
clc
// given data

i=12.0/100 // interest rate 
n=5.0 // years

ProjectA=[-2400,600,600,600,600,600] 
ProjectB=[-2400,800,800,800,800,800]
ProjectC=[-2400,500,700,900,1100,1300]


NPVA=ProjectA(1)+ProjectA(2)*(((1+i)**n) - 1)/(i*(1+i)**n)

printf( "\nNPV of Project A is %.i ",NPVA)

NPVB=ProjectB(1)+ProjectB(2)*(((1+i)**n) - 1)/(i*(1+i)**n)

printf( "\nNPV of Project B is %.0f ",NPVB)

ProjectNPVc=0  // cumulative cash flow for project A
for i =1:5
    
    ProjectNPVc=ProjectNPVc+(-ProjectC(1)+ProjectC(i+1))/(1+i)**(i+1)
end
    
    
printf( "\nNPV of Project C is %.2f ",ProjectNPVc)

// The answer for project C is wrong in the book