diff options
Diffstat (limited to '1118/CH26/EX26.12')
-rwxr-xr-x | 1118/CH26/EX26.12/eg26_12.sce | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/1118/CH26/EX26.12/eg26_12.sce b/1118/CH26/EX26.12/eg26_12.sce new file mode 100755 index 000000000..24d96ef1a --- /dev/null +++ b/1118/CH26/EX26.12/eg26_12.sce @@ -0,0 +1,17 @@ +clear;
+//clc();
+p=800;
+pf1=.72;
+q1=acosd(pf1);
+x=500;
+y=160;
+pf=sqrt(1- (y/x)^2);
+
+q2=acosd(pf);
+qc=p*(tand(q1)-tand(q2));
+
+smd=x*p*((1/pf1)-(1/pf));
+
+ann_cost=y*qc;
+sav=smd-ann_cost;
+printf("The annual saving is:%.0f Rs",sav);
|