summaryrefslogtreecommitdiff
path: root/1118/CH26/EX26.10/eg26_10.sce
blob: 1612c442613dc88951c171d64624351617fa660c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clear;
//clc();

x=900;
p=2000;
q1=acosd(0.8);
q2=acosd(0.96);
smd=x*p*((1/cosd(q1))- (1/cosd(q2)));

y=0.15*1950;
ann_cost=y*p*(tand(q1)-tand(q2));
tot_ann=smd-ann_cost;
printf("The annual saving is:%.0f Rs",tot_ann);