updated the code

2 files changed, 91 insertions, 74 deletions

diff --git a/1208/CH4/EX4.14.4/Exa14_4.sce b/1208/CH4/EX4.14.4/Exa14_4.sce
index 201848c26..9399f1286 100755
--- a/1208/CH4/EX4.14.4/Exa14_4.sce
+++ b/1208/CH4/EX4.14.4/Exa14_4.sce
@@ -1,48 +1,62 @@
-//Exa 14(iv)

-clc;

-clear;

-close;

-//given data :

-inINV=50000;//initial investment in Rs. and equal for all projects

-life=5;//in years

-salvage=0;//in Rs.

-TaxRate=55;//in %

-//depreciation type :Straight line 

-D=inINV/life;//in Rs

-//cash flows before tax of 1st,2nd,3rd,4th and 5th years

-CBFT1=10000;//in Rs.

-CBFT2=11000;//in Rs.

-CBFT3=14000;//in Rs.

-CBFT4=15000;//in Rs.

-CBFT5=25000;//in Rs.

-//Income before tax after depreciation

-IBT1=CBFT1-D;//in Rs.

-IBT2=CBFT2-D;//in Rs.

-IBT3=CBFT3-D;//in Rs.

-IBT4=CBFT4-D;//in Rs.

-IBT5=CBFT5-D;//in Rs.

-//Net income after Tax (55%) and depreciation

-IATD1=IBT1-(IBT1*55)/100;//in Rs

-IATD2=IBT2-(IBT2*55)/100;//in Rs

-IATD3=IBT3-(IBT3*55)/100;//in Rs

-IATD4=IBT4-(IBT4*55)/100;//in Rs

-IATD5=IBT5-(IBT5*55)/100;//in Rs

-//Average annual income after tax and depreciation

-IATD=(IATD1+IATD2+IATD3+IATD4+IATD5)/5;//in Rs.

-//Average Investment

-AvgInv=(inINV+salvage)/2;//in Rs

-//Annual cash inflows

-ACI1=IATD1+D;//in RS

-ACI2=IATD2+D;//in RS

-ACI3=IATD3+D;//in RS

-ACI4=IATD4+D;//in RS

-ACI5=IATD5+D;//in RS

-//Project A : Cummulative cash in flows of 1st,2nd,3rd,4th and 5th years

-CumCIF1=ACI1;//in Rs.

-CumCIF2=ACI1+ACI2;//in Rs.

-CumCIF3=ACI1+ACI2+ACI3;//in Rs.

-CumCIF4=ACI1+ACI2+ACI3+ACI4;//in Rs.

-CumCIF5=ACI1+ACI2+ACI3+ACI4+ACI5;//in Rs.

-//part (iv) Profitability index at 10% discount rate

-PI=P/inINV;//unitless

+//Exa 14(iv)
+clc;
+clear;
+close;
+//given data :
+inINV=50000;//initial investment in Rs. and equal for all projects
+life=5;//in years
+salvage=0;//in Rs.
+TaxRate=55;//in %
+//depreciation type :Straight line 
+D=inINV/life;//in Rs
+//cash flows before tax of 1st,2nd,3rd,4th and 5th years
+CBFT1=10000;//in Rs.
+CBFT2=11000;//in Rs.
+CBFT3=14000;//in Rs.
+CBFT4=15000;//in Rs.
+CBFT5=25000;//in Rs.
+//Income before tax after depreciation
+IBT1=CBFT1-D;//in Rs.
+IBT2=CBFT2-D;//in Rs.
+IBT3=CBFT3-D;//in Rs.
+IBT4=CBFT4-D;//in Rs.
+IBT5=CBFT5-D;//in Rs.
+//Net income after Tax (55%) and depreciation
+IATD1=IBT1-(IBT1*55)/100;//in Rs
+IATD2=IBT2-(IBT2*55)/100;//in Rs
+IATD3=IBT3-(IBT3*55)/100;//in Rs
+IATD4=IBT4-(IBT4*55)/100;//in Rs
+IATD5=IBT5-(IBT5*55)/100;//in Rs
+//Average annual income after tax and depreciation
+IATD=(IATD1+IATD2+IATD3+IATD4+IATD5)/5;//in Rs.
+//Average Investment
+AvgInv=(inINV+salvage)/2;//in Rs
+//Annual cash inflows
+ACI1=IATD1+D;//in RS
+ACI2=IATD2+D;//in RS
+ACI3=IATD3+D;//in RS
+ACI4=IATD4+D;//in RS
+ACI5=IATD5+D;//in RS
+//P.V factor at 10% rate of discount
+PV1=0.909;
+PV2=0.826;
+PV3=0.751;
+PV4=0.683;
+PV5=0.621;
+//Present value for all cash in flows at 10% discount Rate
+P1=ACI1*PV1;// in Rs
+P2=ACI2*PV2;// in Rs
+P3=ACI3*PV3;// in Rs
+P4=ACI4*PV4;// in Rs
+P5=ACI5*PV5;// in Rs
+//Total Present Value
+P=P1+P2+P3+P4+P5;// in Rs
+//Project A : Cummulative cash in flows of 1st,2nd,3rd,4th and 5th years
+CumCIF1=ACI1;//in Rs.
+CumCIF2=ACI1+ACI2;//in Rs.
+CumCIF3=ACI1+ACI2+ACI3;//in Rs.
+CumCIF4=ACI1+ACI2+ACI3+ACI4;//in Rs.
+CumCIF5=ACI1+ACI2+ACI3+ACI4+ACI5;//in Rs.
+//part (iv) Profitability index at 10% discount rate
+PI=P/inINV;//unitless
 disp(PI,"Part(iv) Profitability index at 10% discount rate : ");
\ No newline at end of file
diff --git a/1208/CH9/EX9.7.e/Exa7_e.sce b/1208/CH9/EX9.7.e/Exa7_e.sce
index f59b11273..6b996a338 100755
--- a/1208/CH9/EX9.7.e/Exa7_e.sce
+++ b/1208/CH9/EX9.7.e/Exa7_e.sce
@@ -1,28 +1,31 @@
-//Exa 7(v)

-clc;

-clear;

-close;

-// given data :

-//mix ratio is not same

-SQa=10//in Kgs

-AQa=10//in Kgs

-SPa=8//in rupees per Kgs

-APa=7//in rupees per Kgs

-SQb=8//in kg

-AQb=9//in Kg

-SPb=6//in rupees per Kg

-APb=7//in rupees per Kg

-SQc=4//in kg

-AQc=5//in Kg

-SPc=12//in rupees per Kg

-APc=11//in rupees per Kg

-//(5)  Material sub usage variance

-MSUVa=SPa*(SQa-RSQa);

-MSUVb=SPb*(SQb-RSQb);

-MSUVc=SPc*(SQc-RSQc);

-disp(MSUVa,"MSUV=");

-disp(MSUVb,"MSUV=");

-disp(MSUVc,"MSUV=");

-disp("Note :  ")

-disp("Negative variances indicate adverse value   ");

+//Exa 7(v)
+clc;
+clear;
+close;
+// given data :
+//mix ratio is not same
+SQa=10//in Kgs
+AQa=10//in Kgs
+SPa=8//in rupees per Kgs
+APa=7//in rupees per Kgs
+SQb=8//in kg
+AQb=9//in Kg
+SPb=6//in rupees per Kg
+APb=7//in rupees per Kg
+SQc=4//in kg
+AQc=5//in Kg
+SPc=12//in rupees per Kg
+APc=11//in rupees per Kg
+RSQa=(SQa*24)/(22);
+RSQb=(SQb*24)/(22);
+RSQc=(SQc*24)/(22);
+//(5)  Material sub usage variance
+MSUVa=SPa*(SQa-RSQa);
+MSUVb=SPb*(SQb-RSQb);
+MSUVc=SPc*(SQc-RSQc);
+disp(MSUVa,"MSUV=");
+disp(MSUVb,"MSUV=");
+disp(MSUVc,"MSUV=");
+disp("Note :  ")
+disp("Negative variances indicate adverse value   ");
 disp("Positive variances indicate favourable value   ");
\ No newline at end of file