initial commit / add all books

10 files changed, 306 insertions, 0 deletions

diff --git a/1682/CH6/EX6.1/Exa6_1.sce b/1682/CH6/EX6.1/Exa6_1.sce
new file mode 100755
index 000000000..d7bb4307d
--- /dev/null
+++ b/1682/CH6/EX6.1/Exa6_1.sce
@@ -0,0 +1,27 @@
+//Exa 6.1

+clc;

+clear;

+close;

+//GIVEN DATA :

+disp("Average No. of Km run/year = 20000 Km");

+disp("No. of Km/litre of petrol = 9 Km");

+disp("Therefore,");

+disp("Petrol consumption/year = 20000/9 = 2222.2 litre");

+disp("Cost/litre of petrol for the 1st year = Rs. 21 ");

+disp("Cost/litre of petrol for the 2nd year = Rs. 21 + Re. 1 = Rs. 22 ");

+disp("Cost/litre of petrol for the 3rd year = Rs. 22 + Re. 1 = Rs. 23 ");

+disp("Cost/litre of petrol for the 4th year = Rs. 23 + Re. 1 = Rs. 24 ");

+

+disp("Fuel expenditure for 1st year = 2222.2 * 21 = Rs. 46666.20");

+disp("Fuel expenditure for 2nd year = 2222.2 * 22 = Rs. 48888.40");

+disp("Fuel expenditure for 3rd year = 2222.2 * 23 = Rs. 51110.60");

+disp("Fuel expenditure for 4th year = 2222.2 * 24 = Rs. 53332.80");

+disp("The annual equal increment of the above expendiyure is Rs. 2222.20(G)");

+

+A1=46666.20;//in Rs.

+G=2222.20;//in Rs.

+i=18;//in % per annum

+n=4;//in years

+A=A1+G*(((1+i/100)^n)-i*n/100-1)/(((i/100)*(1+i/100)^n)-i/100) ;

+disp(A,"Annual equal amount spending for petrol in Rs. : ");

+disp("This amoount is less than the annual rental value of Rs. 60000. Therefore, the company should continue to provide its own car to its executive. ");
\ No newline at end of file
diff --git a/1682/CH6/EX6.10/Exa6_10.sce b/1682/CH6/EX6.10/Exa6_10.sce
new file mode 100755
index 000000000..2d02be671
--- /dev/null
+++ b/1682/CH6/EX6.10/Exa6_10.sce
@@ -0,0 +1,46 @@
+//Exa 6.10

+clc;

+clear;

+close;

+//Brand A : 

+disp("Brand A : ");

+w=12;//in months

+P=1200;//in Rs/tyre

+i=12;//in % nominal rate(Compounded anually)

+i=i/12;//in % compounded monthly

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_A=P*((i/100)*(1+i/100)^w)/(((1+i/100)^w)-1);//in RS

+disp(AE_A,"The annual equivalent for this brand in RS. : ");

+

+//Brand B : 

+disp("Brand B : ");

+w=24;//in months

+P=1800;//in Rs/tyre

+i=12;//in % nominal rate(Compounded anually)

+i=i/12;//in % compounded monthly

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_B=P*((i/100)*(1+i/100)^w)/(((1+i/100)^w)-1);//in RS

+disp(AE_B,"The annual equivalent for this brand in RS. : ");

+

+//Brand C : 

+disp("Brand C : ");

+w=36;//in months

+P=2100;//in Rs/tyre

+i=12;//in % nominal rate(Compounded anually)

+i=i/12;//in % compounded monthly

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_C=P*((i/100)*(1+i/100)^w)/(((1+i/100)^w)-1);//in RS

+disp(AE_C,"The annual equivalent for this brand in RS. : ");

+

+//Brand D : 

+disp("Brand D : ");

+w=48;//in months

+P=2700;//in Rs/tyre

+i=12;//in % nominal rate(Compounded anually)

+i=i/12;//in % compounded monthly

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_D=P*((i/100)*(1+i/100)^w)/(((1+i/100)^w)-1);//in RS

+disp(AE_D,"The annual equivalent for this brand in RS. : ");

+

+disp("Here common multiple lives of tyres is considered. This is 144 months. Therefore, the comparison is nade on 144 months basis.");

+disp("The annual equivalent cost of Brand C is less than that of other brands. hence, it should be used in the vehicles of the trucking company. It should be replaced  for times during the 144 months period.");
\ No newline at end of file
diff --git a/1682/CH6/EX6.2/Exa6_2.sce b/1682/CH6/EX6.2/Exa6_2.sce
new file mode 100755
index 000000000..1ba373075
--- /dev/null
+++ b/1682/CH6/EX6.2/Exa6_2.sce
@@ -0,0 +1,35 @@
+//Exa 6.2

+clc;

+clear;

+close;

+//Alternative 1 :

+disp("Alternative 1: ");

+P=500000;//in Rs

+A=200000;//in Rs

+i=20;//in % per annum

+n=15;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_1=P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A;//in RS

+disp(AE_1,"The Annual equivalent cost of alternative 1 in RS. : ");

+

+//Alternative 2 :

+disp("Alternative 2: ");

+P=400000;//in Rs

+A=300000;//in Rs

+i=20;//in % per annum

+n=15;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_2=P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A;//in RS

+disp(AE_2,"The Annual equivalent cost of alternative 1 in RS. : ");

+

+//Alternative 3 :

+disp("Alternative 3: ");

+P=600000;//in Rs

+A=150000;//in Rs

+i=20;//in % per annum

+n=15;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_3=P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A;//in RS

+disp(AE_3,"The Annual equivalent cost of alternative 1 in RS. : ");

+disp("The annual equivalent cost of manufacturer 3 is less than that of other two. Therefore, company should buy advanced machine centre from manufacturer 3. ");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.3/Exa6_3.sce b/1682/CH6/EX6.3/Exa6_3.sce
new file mode 100755
index 000000000..b90ef505a
--- /dev/null
+++ b/1682/CH6/EX6.3/Exa6_3.sce
@@ -0,0 +1,28 @@
+//Exa 6.3

+clc;

+clear;

+close;

+//Alternative A :

+disp("Alternative A: ");

+P=150000;//in Rs

+A=60000;//in Rs

+S=15000;//in Rs

+i=25;//in % per annum

+n=5;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+AE_A=-P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A+S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE_A,"The Annual equivalent revenue of alternative A in RS. : ");

+//Alternative B :

+disp("Alternative B: ");

+P=175000;//in Rs

+A=70000;//in Rs

+S=35000;//in Rs

+i=25;//in % per annum

+n=5;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+AE_B=-P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A+S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE_B,"The Annual equivalent revenue of alternative A in RS. : ");

+disp("The annual equivalent net return of alternative B is more than that of alternative A. Thus the company should select alternative A");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.4/Exa6_4.sce b/1682/CH6/EX6.4/Exa6_4.sce
new file mode 100755
index 000000000..48c86e911
--- /dev/null
+++ b/1682/CH6/EX6.4/Exa6_4.sce
@@ -0,0 +1,28 @@
+//Exa 6.4

+clc;

+clear;

+close;

+//Machine X :

+disp("Machine X : ");

+P=150000;//in Rs

+A=0;//in Rs

+S=0;//in Rs

+i=15;//in % per annum

+n=12;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_X=P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1);//in RS

+disp(AE_X,"The Annual equivalent cost of machine X in RS. : ");

+

+//Machine Y :

+disp("Machine Y : ");

+P=240000;//in Rs

+A=4500;//in Rs

+S=60000;//in Rs

+i=15;//in % per annum

+n=12;//in years

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+AE_Y=P*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+A-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE_Y,"The Annual equivalent cost of machine X in RS. : ");

+disp("The annual equivalent cost of machine X is less than that of machine Y.So machine X is more cost effective machine. ");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.5/Exa6_5.sce b/1682/CH6/EX6.5/Exa6_5.sce
new file mode 100755
index 000000000..24645f3e1
--- /dev/null
+++ b/1682/CH6/EX6.5/Exa6_5.sce
@@ -0,0 +1,32 @@
+//Exa 6.5

+clc;

+clear;

+close;

+//Alternative 1 : Around the lake

+disp("Alternative 1 : Around the lake");

+FC=15*150000;//in Rs

+MC=15*6000;//in Rs

+PL=15*15000;//in Rs

+MCPL=MC+PL;//in Rs

+S=15*90000;//in Rs

+i=15;//in % per annum

+n=15;//in years

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE1=FC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+MCPL-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE1,"The Annual equivalent cost for this alternative in RS. : ");

+

+//Alternative 1 : Under the lake

+FC=5*750000;//in Rs

+MC=5*12000;//in Rs

+PL=5*15000;//in Rs

+MCPL=MC+PL;//in Rs

+S=5*150000;//in Rs

+i=15;//in % per annum

+n=15;//in years

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE2=FC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+MCPL-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE2,"The Annual equivalent cost for this alternative in RS. : ");

+disp("The annual equivalent cost of alternative 1 is less than that of alternative 2. Therefore, select the route around the lake for laying the power line.");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.6/Exa6_6.sce b/1682/CH6/EX6.6/Exa6_6.sce
new file mode 100755
index 000000000..c47366214
--- /dev/null
+++ b/1682/CH6/EX6.6/Exa6_6.sce
@@ -0,0 +1,33 @@
+//Exa 6.6

+clc;

+clear;

+close;

+//Alternative 1 : Purchase of diesel Taxi

+disp("Alternative 1 : Purchase of diesel Taxi");

+VC=390000;//in Rs

+LpY=60000/30;//in litres

+FcY=2000*8;//in Rs

+AllExp=FcY+9000+15000;//in Rs

+S=60000;//in Rs

+i=20;//in % per annum

+n=4;//in years

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE1=VC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+AllExp-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE1,"The Annual equivalent cost for this alternative in RS. : ");

+

+//Alternative 2 : Purchase of petrol Taxi

+disp("Alternative 2 : Purchase of petrol Taxi");

+VC=360000;//in Rs

+LpY=60000/20;//in litres

+FcY=3000*20;//in Rs

+AllExp=FcY+6000+15000;//in Rs

+S=90000;//in Rs

+i=20;//in % per annum

+n=3;//in years

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE2=VC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+AllExp-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE2,"The Annual equivalent cost for this alternative in RS. : ");

+disp("The annual equivalent cost of purchase and operation of cars with diesel engine is less than that of cars with petrol engine. Therefore, the taxy company should buy cars with diesel engine.");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.7/Exa6_7.sce b/1682/CH6/EX6.7/Exa6_7.sce
new file mode 100755
index 000000000..89dde4a00
--- /dev/null
+++ b/1682/CH6/EX6.7/Exa6_7.sce
@@ -0,0 +1,23 @@
+//Exa 6.7

+clc;

+clear;

+close;

+//Alternative 1 : Purchase car for cash

+disp("Alternative 1 : Purchase car for cash");

+Pprice=390000;//in Rs

+n=3;//in years

+n=n*12;//in months

+S=120000;//in Rs

+i=12;//in % nominal rate(Compounded anually)

+i=i/12;//in % compounded monthly

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+ME1=Pprice*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(ME1,"The Monthly equivalent cost for this alternative in RS. : ");

+

+//Alternative 2 : Use of car under lease

+disp("Alternative 2 : Use of car under lease");

+LeaseAmount=10500;//in Rs

+MonthlyEquiCost=LeaseAmount;//in Rs.

+disp(MonthlyEquiCost,"The Monthly equivalent cost for this alternative in RS. : ");

+disp("The monthly equivalent cost of alternative 1 is less than that of alternative 2. hence the salesman should purchase the car for cash.")
\ No newline at end of file
diff --git a/1682/CH6/EX6.8/Exa6_8.sce b/1682/CH6/EX6.8/Exa6_8.sce
new file mode 100755
index 000000000..c1332af3c
--- /dev/null
+++ b/1682/CH6/EX6.8/Exa6_8.sce
@@ -0,0 +1,29 @@
+//Exa 6.8

+clc;

+clear;

+close;

+//Machine A :

+disp("Machine A : ");

+IC=300000;//in Rs

+n=4;//in years

+S=200000;//in Rs

+AM=30000;//in Rs

+i=15;//in % per annum

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_A=IC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+AM-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE_A,"The Annual equivalent cost of machine X in RS. : ");

+

+//Machine B :

+disp("Machine B : ");

+IC=600000;//in Rs

+n=4;//in years

+S=300000;//in Rs

+AM=0;//in Rs

+i=15;//in % per annum

+//Formula : (A/F,i,n) : (i/100)/(((1+i/100)^n)-1)

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+AE_B=IC*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)+AM-S*(i/100)/(((1+i/100)^n)-1);//in RS

+disp(AE_B,"The Annual equivalent cost of machine X in RS. : ");

+disp("The annual equivalent cost of machine A is less than that of machine B.So machine A is more cost effective machine. It is advised to buy machine A ");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file
diff --git a/1682/CH6/EX6.9/Exa6_9.sce b/1682/CH6/EX6.9/Exa6_9.sce
new file mode 100755
index 000000000..fe70e09c5
--- /dev/null
+++ b/1682/CH6/EX6.9/Exa6_9.sce
@@ -0,0 +1,25 @@
+//Exa 6.9

+clc;

+clear;

+close;

+//Alternative 1 : 

+disp("Alternative 1 : ");

+DP=60000;//in Rs

+P1=15000;//in Rs

+n=1;//in years

+i=12;//in % Compounded anually

+//Formula : (P/F,i,n) : 1/((1+i/100)^n)

+PW1=DP+P1*1/((1+i/100)^n);//in RS

+disp(PW1,"The annual equivalent for this alternative in RS. : ");

+//Formula : (A/P,i,n) : ((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+n=4;//in years

+AE1=PW1*((i/100)*(1+i/100)^n)/(((1+i/100)^n)-1)

+disp(AE1,"The annual equivalent for this alternative in RS. : ");

+

+//Alternative 2 : 

+disp("Alternative 2 : ");

+P4y=90000;//in Rs

+AE2=P4y*(i/100)/(((1+i/100)^n)-1);//in Rs.

+disp(AE2,"The annual equivalent for this alternative in RS. : ");

+disp("The annual equivalent cost of alternative 2 is less than that of alternative 1. Hence, Joshi Lakshimi should select alternative 2 for purchasing the home equipment.");

+//Note : Calculation in the book is not accurate.
\ No newline at end of file