summaryrefslogtreecommitdiff
path: root/1553/CH4
diff options
context:
space:
mode:
Diffstat (limited to '1553/CH4')
-rw-r--r--1553/CH4/EX4.1/4Ex1.sce13
-rw-r--r--1553/CH4/EX4.10/4EX10.sce8
-rw-r--r--1553/CH4/EX4.11/4Ex11.sce7
-rw-r--r--1553/CH4/EX4.12/4Ex12.sce14
-rw-r--r--1553/CH4/EX4.13/4Ex13.sce25
-rw-r--r--1553/CH4/EX4.14/4Ex14.sce16
-rw-r--r--1553/CH4/EX4.15/4Ex15.sce16
-rw-r--r--1553/CH4/EX4.16/4Ex16.sce10
-rw-r--r--1553/CH4/EX4.17/4Ex17.sce10
-rw-r--r--1553/CH4/EX4.18/4Ex18.sce7
-rw-r--r--1553/CH4/EX4.19/4Ex19.sce10
-rw-r--r--1553/CH4/EX4.20/4Ex20.sce8
-rw-r--r--1553/CH4/EX4.21/4Ex21.sce11
-rw-r--r--1553/CH4/EX4.22/4Ex22.sce15
-rw-r--r--1553/CH4/EX4.23/4Ex23.sce9
-rw-r--r--1553/CH4/EX4.24/4Ex24.sce8
-rw-r--r--1553/CH4/EX4.25/4Ex25.sce12
-rw-r--r--1553/CH4/EX4.26/4Ex26.sce10
-rw-r--r--1553/CH4/EX4.27/4Ex27.sce10
-rw-r--r--1553/CH4/EX4.28/4Ex28.sce10
-rw-r--r--1553/CH4/EX4.29/4Ex29.sce8
-rw-r--r--1553/CH4/EX4.3/4Ex3.sce7
-rw-r--r--1553/CH4/EX4.30/4Ex30.sce8
-rw-r--r--1553/CH4/EX4.31/4Ex31.sce9
-rw-r--r--1553/CH4/EX4.32/4Ex32.sce10
-rw-r--r--1553/CH4/EX4.33/4Ex33.sce8
-rw-r--r--1553/CH4/EX4.34/4Ex34.sce9
-rw-r--r--1553/CH4/EX4.35/4Ex35.sce8
-rw-r--r--1553/CH4/EX4.36/4Ex36.sce13
-rw-r--r--1553/CH4/EX4.37/4Ex37.sce17
-rw-r--r--1553/CH4/EX4.38/4Ex38.sce16
-rw-r--r--1553/CH4/EX4.39/4Ex39.sce8
-rw-r--r--1553/CH4/EX4.4/4Ex4.sce13
-rw-r--r--1553/CH4/EX4.5/4Ex5.sce7
-rw-r--r--1553/CH4/EX4.6/4Ex6.sce7
-rw-r--r--1553/CH4/EX4.7/4Ex7.sce7
-rw-r--r--1553/CH4/EX4.8/4Ex8.sce13
-rw-r--r--1553/CH4/EX4.9/4Ex9.sce22
38 files changed, 419 insertions, 0 deletions
diff --git a/1553/CH4/EX4.1/4Ex1.sce b/1553/CH4/EX4.1/4Ex1.sce
new file mode 100644
index 000000000..650042dd2
--- /dev/null
+++ b/1553/CH4/EX4.1/4Ex1.sce
@@ -0,0 +1,13 @@
+//Chapter 4 Ex 1
+
+clc;
+clear;
+close;
+
+//(i)
+x=5005-5000/10;
+mprintf("(i)The value of expression is %d",x);
+
+//(ii)
+y=18800/470/20;
+mprintf("\n (ii)The value of expression is %d",y);
diff --git a/1553/CH4/EX4.10/4EX10.sce b/1553/CH4/EX4.10/4EX10.sce
new file mode 100644
index 000000000..ae7fb45c8
--- /dev/null
+++ b/1553/CH4/EX4.10/4EX10.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 10
+clc;
+clear;
+close;
+ratioXY=6/5; //the ratio of x/y
+//dividing the equation (x^2+y^2)/(x^2-y^2) by y^2 we get (x/y)^2+1/(x/y)^2-1
+value=(ratioXY^2+1)/(ratioXY^2-1);
+mprintf("The value of expression is %.2f",value);
diff --git a/1553/CH4/EX4.11/4Ex11.sce b/1553/CH4/EX4.11/4Ex11.sce
new file mode 100644
index 000000000..afd947797
--- /dev/null
+++ b/1553/CH4/EX4.11/4Ex11.sce
@@ -0,0 +1,7 @@
+//Chapter 4 Ex 11
+
+clc;
+close;
+clear;
+expr=4-(5/(1+(1/(3+(1/(2+(1/4)))))));
+mprintf("The Value of expression is %.3f",expr);
diff --git a/1553/CH4/EX4.12/4Ex12.sce b/1553/CH4/EX4.12/4Ex12.sce
new file mode 100644
index 000000000..8d5614c38
--- /dev/null
+++ b/1553/CH4/EX4.12/4Ex12.sce
@@ -0,0 +1,14 @@
+//Chapter 4 Ex 12
+
+clc;
+clear;
+close;
+
+x=poly(0,'x');
+for x=0.1:0.1:0.9
+ if (x/(1+1-x))==0.5
+ mprintf("\n The value of x is %.2f",x);
+ break;
+ end
+end
+
diff --git a/1553/CH4/EX4.13/4Ex13.sce b/1553/CH4/EX4.13/4Ex13.sce
new file mode 100644
index 000000000..79286086a
--- /dev/null
+++ b/1553/CH4/EX4.13/4Ex13.sce
@@ -0,0 +1,25 @@
+//Chapter 4 Ex 13
+
+clc;
+clear;
+close;
+
+//(i)
+a=poly(0,'a');
+b1=a/(3/4); //equation(1)
+b2=(22-(8*a))/5; //equation(2)
+for a=1:0.1:10
+ if (a/(3/4))==((22-(8*a))/5) then
+ break;
+ end
+end
+mprintf("(i)The value of a is %.1f",a);
+
+//(ii)
+x=poly(0,'x');
+for x=1:10
+ if ((x/4)-((x-3)/6))==1 then
+ break;
+ end
+end
+mprintf("\n(ii) The value of x is %.0f",x);
diff --git a/1553/CH4/EX4.14/4Ex14.sce b/1553/CH4/EX4.14/4Ex14.sce
new file mode 100644
index 000000000..06cb2e2c7
--- /dev/null
+++ b/1553/CH4/EX4.14/4Ex14.sce
@@ -0,0 +1,16 @@
+//chapter 4 Ex 14
+
+clc;
+clear;
+close;
+x=poly(0,'x');
+y=(34-2*x)/3; //equation 1
+y=8*x/5; //equation 2
+for x=1:99
+ if (34-2*x)/3==8*x/5
+ mprintf("x=%i \n ",x);
+ break
+ end
+end
+y=8*x/5;
+printf("The value of 5*y+7*x is: %d",(5*y+7*x));
diff --git a/1553/CH4/EX4.15/4Ex15.sce b/1553/CH4/EX4.15/4Ex15.sce
new file mode 100644
index 000000000..016a389b8
--- /dev/null
+++ b/1553/CH4/EX4.15/4Ex15.sce
@@ -0,0 +1,16 @@
+//chapter 4 Ex 15
+
+clc;
+clear;
+close;
+x=poly(0,'x');
+y=(51-x)/4; //equation 1
+y=(43-3*x)/2; //equation 2
+for x=1:99
+ if (51-x)/4==(43-3*x)/2
+ break
+ end
+end
+y=(43-3*x)/2;
+z=12-y+x;
+printf("The values of x, y & z are: %d, %d, and %d respectively",x,y,z);
diff --git a/1553/CH4/EX4.16/4Ex16.sce b/1553/CH4/EX4.16/4Ex16.sce
new file mode 100644
index 000000000..b3c8af397
--- /dev/null
+++ b/1553/CH4/EX4.16/4Ex16.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 16
+
+clc;
+clear;
+close;
+a=1;
+for n=2:99
+ a= a*(1-(1/(1+n)));
+end
+mprintf("The value is %.2f",a);
diff --git a/1553/CH4/EX4.17/4Ex17.sce b/1553/CH4/EX4.17/4Ex17.sce
new file mode 100644
index 000000000..1936ac642
--- /dev/null
+++ b/1553/CH4/EX4.17/4Ex17.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 17
+
+clc;
+clear;
+close;
+a=0;
+for n=2:9
+ a= a+(1/(n*(n+1)));
+end
+mprintf("The value is %0.2f",a);
diff --git a/1553/CH4/EX4.18/4Ex18.sce b/1553/CH4/EX4.18/4Ex18.sce
new file mode 100644
index 000000000..ee2143dc9
--- /dev/null
+++ b/1553/CH4/EX4.18/4Ex18.sce
@@ -0,0 +1,7 @@
+//chapter 4 Ex 18
+
+clc;
+clear;
+close;
+ans=(100-1/49)*245;
+mprintf("The simplified value is %d",ans);
diff --git a/1553/CH4/EX4.19/4Ex19.sce b/1553/CH4/EX4.19/4Ex19.sce
new file mode 100644
index 000000000..853ade7ee
--- /dev/null
+++ b/1553/CH4/EX4.19/4Ex19.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 19
+
+clc;
+clear;
+close;
+Length=(7*12+9); //converting into inches
+Length_part=Length/3;
+Length_part_ft=Length_part/12;
+Length_part_in=modulo(Length_part,12);
+printf("The length of each part is %d ft %d inches",Length_part_ft,Length_part_in);
diff --git a/1553/CH4/EX4.20/4Ex20.sce b/1553/CH4/EX4.20/4Ex20.sce
new file mode 100644
index 000000000..d5149bc13
--- /dev/null
+++ b/1553/CH4/EX4.20/4Ex20.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 20
+
+clc;
+clear;
+close;
+total=8600; s=5;d=4;n=2;
+amtD=total/(5*s+4*d+n);
+printf("The share of each daughter is Rs. %d",d*amtD);
diff --git a/1553/CH4/EX4.21/4Ex21.sce b/1553/CH4/EX4.21/4Ex21.sce
new file mode 100644
index 000000000..95cada65f
--- /dev/null
+++ b/1553/CH4/EX4.21/4Ex21.sce
@@ -0,0 +1,11 @@
+//chapter 4 Ex 21
+
+clc;
+clear;
+close;
+rent=2/5; food=3/10; conveyance=1/8; Amtleft=1400;
+PartLeft=1-(rent+food+conveyance);
+salary=Amtleft/PartLeft;
+eFood=food*salary;
+eConveyance=conveyance*salary;
+printf("The expenditure on food is Rs. %3.0f and that on conveyance is Rs. %3.0f",eFood,eConveyance);
diff --git a/1553/CH4/EX4.22/4Ex22.sce b/1553/CH4/EX4.22/4Ex22.sce
new file mode 100644
index 000000000..9a072b89e
--- /dev/null
+++ b/1553/CH4/EX4.22/4Ex22.sce
@@ -0,0 +1,15 @@
+//chapter 4 Ex 22
+
+clc;
+clear;
+close;
+x=poly(0,'x');
+y=(2*x-180)/3; //equation 1
+y=240-x; //equation 2
+for x=1:200
+ if (2*x-180)/3==240-x
+ break
+ end
+end
+y=240-x;
+printf("Arun got %d marks in English",y);
diff --git a/1553/CH4/EX4.23/4Ex23.sce b/1553/CH4/EX4.23/4Ex23.sce
new file mode 100644
index 000000000..9c29e6bf5
--- /dev/null
+++ b/1553/CH4/EX4.23/4Ex23.sce
@@ -0,0 +1,9 @@
+//chapter 4 Ex 23
+
+clc;
+clear;
+close;
+b_taken=6; b_poured=4; //number of bottles taken and poured respectively
+oil_filled=4/5; oilfill_poured=3/4;
+numBottles=(b_taken-b_poured)/(oil_filled-oilfill_poured);
+mprintf("The required number of bottles are %0.0f",numBottles);
diff --git a/1553/CH4/EX4.24/4Ex24.sce b/1553/CH4/EX4.24/4Ex24.sce
new file mode 100644
index 000000000..d87fe2f2d
--- /dev/null
+++ b/1553/CH4/EX4.24/4Ex24.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 24
+
+clc;
+clear;
+close;
+penBlack=1/8; penBlue=3.5;
+totalLength=penBlue/(1/2*(1-penBlack));
+mprintf("The total length of pencil is %0.0f",totalLength);
diff --git a/1553/CH4/EX4.25/4Ex25.sce b/1553/CH4/EX4.25/4Ex25.sce
new file mode 100644
index 000000000..f23d1f318
--- /dev/null
+++ b/1553/CH4/EX4.25/4Ex25.sce
@@ -0,0 +1,12 @@
+//chapter 4 Ex 25
+
+clc;
+clear;
+close;
+women=1/3; men=1-women;
+womenMarried=1/2*women;
+womenChildren=1/3*womenMarried;
+menChildren=(2/3)*(3/4)*men;
+workerChildren=womenChildren+menChildren;
+NoChildren=1-workerChildren;
+mprintf("The workers with no children are %1.2f part of total workers",NoChildren);
diff --git a/1553/CH4/EX4.26/4Ex26.sce b/1553/CH4/EX4.26/4Ex26.sce
new file mode 100644
index 000000000..3401536ec
--- /dev/null
+++ b/1553/CH4/EX4.26/4Ex26.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 23
+
+clc;
+clear;
+close;
+bruised=1/30;
+unsalable=3/4;
+unsalableMangoes=12;
+totalMangoes=unsalableMangoes/(unsalable*bruised);
+mprintf("The total number of mangoes are %0.0f",totalMangoes);
diff --git a/1553/CH4/EX4.27/4Ex27.sce b/1553/CH4/EX4.27/4Ex27.sce
new file mode 100644
index 000000000..152c8afa0
--- /dev/null
+++ b/1553/CH4/EX4.27/4Ex27.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 27
+
+clc;
+clear;
+close;
+firstStation=280;
+secondStation=12;
+thirdStationTotal=248;
+totalBeginning=(((thirdStationTotal-secondStation)/(1/2))-280)/(2/3);
+mprintf("The total number of passengers in the beginning were %0.0f",totalBeginning);
diff --git a/1553/CH4/EX4.28/4Ex28.sce b/1553/CH4/EX4.28/4Ex28.sce
new file mode 100644
index 000000000..95a890548
--- /dev/null
+++ b/1553/CH4/EX4.28/4Ex28.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 28
+
+clc;
+clear;
+close;
+sumsquares=117; product=54;
+Sum=sqrt(sumsquares+2*product); //from the formula (a+b)^2=a^2+b^2+2*a*b
+subtract=sqrt(sumsquares-2*product);
+value=Sum/subtract;
+mprintf("The value of (a+b)/(a-b)=%.0f",value);
diff --git a/1553/CH4/EX4.29/4Ex29.sce b/1553/CH4/EX4.29/4Ex29.sce
new file mode 100644
index 000000000..fd94da1bd
--- /dev/null
+++ b/1553/CH4/EX4.29/4Ex29.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 28
+
+clc;
+clear;
+close;
+a=75983; b=45983; c=30000;
+value=(a*a-b*b)/c;
+mprintf("The value is %d",value);
diff --git a/1553/CH4/EX4.3/4Ex3.sce b/1553/CH4/EX4.3/4Ex3.sce
new file mode 100644
index 000000000..83ce23ac5
--- /dev/null
+++ b/1553/CH4/EX4.3/4Ex3.sce
@@ -0,0 +1,7 @@
+//Chapter 4 Ex 3
+
+clc;
+clear;
+close;
+x=67/5-(9/2+19/6+7/3); //derived from problem statement 9/2+19/6+x+7/3=67/5
+mprintf("The missing term is %.2f",x);
diff --git a/1553/CH4/EX4.30/4Ex30.sce b/1553/CH4/EX4.30/4Ex30.sce
new file mode 100644
index 000000000..2338f991d
--- /dev/null
+++ b/1553/CH4/EX4.30/4Ex30.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 30
+
+clc;
+clear;
+close;
+a=343; b=113;
+value=(a*a*a-b*b*b)/(a*a+a*b+b*b);
+mprintf("The value is %d",value);
diff --git a/1553/CH4/EX4.31/4Ex31.sce b/1553/CH4/EX4.31/4Ex31.sce
new file mode 100644
index 000000000..8f5ac4fb1
--- /dev/null
+++ b/1553/CH4/EX4.31/4Ex31.sce
@@ -0,0 +1,9 @@
+//chapter 4 Ex 31
+
+clc;
+clear;
+close;
+popX=68000; popY=42000;
+rateX=1200; rateY=800;
+years=(popX-popY)/(rateX+rateY);
+mprintf("The population will be equal after %d years",years);
diff --git a/1553/CH4/EX4.32/4Ex32.sce b/1553/CH4/EX4.32/4Ex32.sce
new file mode 100644
index 000000000..1a0c04023
--- /dev/null
+++ b/1553/CH4/EX4.32/4Ex32.sce
@@ -0,0 +1,10 @@
+//chapter 4 Ex 32
+
+clc;
+clear;
+close;
+girlsLeave=15; boysEachgirl=2; boysLeave=45; girlsEachboy=5;
+//let x boys are there at present; thus totalboys=x+45; girls=5*x
+boysPresent=boysLeave/(girlsEachboy*boysEachgirl-1);
+girlsBeginning=girlsEachboy*boysPresent+girlsLeave;
+mprintf("The number of girls in the beginning were %d",girlsBeginning);
diff --git a/1553/CH4/EX4.33/4Ex33.sce b/1553/CH4/EX4.33/4Ex33.sce
new file mode 100644
index 000000000..dc82a9b3f
--- /dev/null
+++ b/1553/CH4/EX4.33/4Ex33.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 33
+
+clc;
+clear;
+close;
+Eachday=20; idleFortified=3; twoMonths=60; wageTwoMonths=280;
+idleDays=(Eachday*twoMonths-wageTwoMonths)/(Eachday+idleFortified);
+mprintf("The worker remained idle for %d days",idleDays);
diff --git a/1553/CH4/EX4.34/4Ex34.sce b/1553/CH4/EX4.34/4Ex34.sce
new file mode 100644
index 000000000..ced85481a
--- /dev/null
+++ b/1553/CH4/EX4.34/4Ex34.sce
@@ -0,0 +1,9 @@
+//chapter 4 Ex 34
+
+clc;
+clear;
+close;
+totalnotes=85; amount=5000; den100=100; den50=50;
+notes50=(amount-den100*totalnotes)/(den50-den100);
+amount50=notes50*den50;
+mprintf("The required amount is Rs.%d",amount50);
diff --git a/1553/CH4/EX4.35/4Ex35.sce b/1553/CH4/EX4.35/4Ex35.sce
new file mode 100644
index 000000000..51e8361eb
--- /dev/null
+++ b/1553/CH4/EX4.35/4Ex35.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 35
+
+clc;
+clear;
+close;
+n1=14; n2=18; amtEach=80;
+amtTotal=amtEach/(1/n1-1/n2);
+mprintf("The total amount was Rs.%d",amtTotal);
diff --git a/1553/CH4/EX4.36/4Ex36.sce b/1553/CH4/EX4.36/4Ex36.sce
new file mode 100644
index 000000000..245bc67fb
--- /dev/null
+++ b/1553/CH4/EX4.36/4Ex36.sce
@@ -0,0 +1,13 @@
+//chapter 4 Ex 36
+
+clc;
+clear;
+close;
+expenses=360; expCut=3; numdaysCut=4;
+
+for n=1:99
+ if n^2+4*n-480==0
+ break;
+ end
+end
+mprintf("Mr. Bhaskar is on tour for %d days",n);
diff --git a/1553/CH4/EX4.37/4Ex37.sce b/1553/CH4/EX4.37/4Ex37.sce
new file mode 100644
index 000000000..a011834be
--- /dev/null
+++ b/1553/CH4/EX4.37/4Ex37.sce
@@ -0,0 +1,17 @@
+//chapter 4 Ex 37
+
+clc;
+clear;
+close;
+cost1=86; cost2=112;
+x=poly(0,'x');
+y=(cost1-2*x)/3; //equation 1
+y=cost2-4*x; //equation 2
+for x=1:99
+ if (cost1-2*x)/3==cost2-4*x
+ break
+ end
+end
+y=cost2-4*x;
+printf("The cost of pen is Rs.%d and that of pencil is Rs.%d",x,y);
+
diff --git a/1553/CH4/EX4.38/4Ex38.sce b/1553/CH4/EX4.38/4Ex38.sce
new file mode 100644
index 000000000..dee0c6545
--- /dev/null
+++ b/1553/CH4/EX4.38/4Ex38.sce
@@ -0,0 +1,16 @@
+//chapter 4 Ex 38
+
+clc;
+clear;
+close;
+x=poly(0,'x');
+AtoS=30; StoA=10;
+y=2*x-(AtoS+2*AtoS); //equation 1
+y=(x+AtoS+StoA)/3; //equation 2
+for x=1:99
+ if 2*x-(AtoS+2*AtoS)==(x+AtoS+StoA)/3
+ break
+ end
+end
+y=(x+AtoS+StoA)/3;
+printf("Arun has Rs.%d and Sajal has Rs.%d",x,y);
diff --git a/1553/CH4/EX4.39/4Ex39.sce b/1553/CH4/EX4.39/4Ex39.sce
new file mode 100644
index 000000000..8de543128
--- /dev/null
+++ b/1553/CH4/EX4.39/4Ex39.sce
@@ -0,0 +1,8 @@
+//chapter 4 Ex 39
+
+clc;
+clear;
+close;
+hens=50; goats=45; camels=8; numFeet=224;
+numKeepers=numFeet-((goats*4+camels*4+hens*2)-(hens+goats+camels));
+mprintf("The total number of keepers are %d",numKeepers);
diff --git a/1553/CH4/EX4.4/4Ex4.sce b/1553/CH4/EX4.4/4Ex4.sce
new file mode 100644
index 000000000..29a729de8
--- /dev/null
+++ b/1553/CH4/EX4.4/4Ex4.sce
@@ -0,0 +1,13 @@
+//Chapter 4 Ex 4
+
+clc;
+clear;
+close;
+// from given statement we the equation as (4/21)x-(8/45)x=8
+for x=1:700
+ if ((4/21)*x-(8/45)*x)==8
+ break;
+ end
+end
+half=x/2;
+mprintf("The required number is %d",half);
diff --git a/1553/CH4/EX4.5/4Ex5.sce b/1553/CH4/EX4.5/4Ex5.sce
new file mode 100644
index 000000000..c23d98837
--- /dev/null
+++ b/1553/CH4/EX4.5/4Ex5.sce
@@ -0,0 +1,7 @@
+//Chapter 4 Ex 5
+
+clc;
+close;
+clear;
+expr=[(13/4)/{5/4-(1/2)*(5/2-(1/4-1/6))}];
+mprintf("The value of expression is %.0f",expr);
diff --git a/1553/CH4/EX4.6/4Ex6.sce b/1553/CH4/EX4.6/4Ex6.sce
new file mode 100644
index 000000000..bc3b2e77a
--- /dev/null
+++ b/1553/CH4/EX4.6/4Ex6.sce
@@ -0,0 +1,7 @@
+//Chapter 4 Ex 6
+
+clc;
+close;
+clear;
+expr=108/[36*(1/4)]+[(2/5)*(13/4)];
+mprintf("The value of expression is %.2f",expr);
diff --git a/1553/CH4/EX4.7/4Ex7.sce b/1553/CH4/EX4.7/4Ex7.sce
new file mode 100644
index 000000000..62f603f0d
--- /dev/null
+++ b/1553/CH4/EX4.7/4Ex7.sce
@@ -0,0 +1,7 @@
+//Chapter 4 Ex 7
+
+clc;
+clear;
+close;
+expr=(((7/2)/(5/2)*(3/2))/((7/2)/((5/2)*(3/2))))/5.25;
+mprintf("The value of expression is %.2f",expr);
diff --git a/1553/CH4/EX4.8/4Ex8.sce b/1553/CH4/EX4.8/4Ex8.sce
new file mode 100644
index 000000000..655054120
--- /dev/null
+++ b/1553/CH4/EX4.8/4Ex8.sce
@@ -0,0 +1,13 @@
+//Chapter 4 Ex 8
+
+clc;
+clear;
+close;
+
+//(i)
+expr1=12.05*5.4/0.6;
+mprintf("The value of expression is %.2f",expr1);
+
+//(ii)
+expr2=(0.6*0.6)+(0.6/6);
+mprintf("\n The value of expression is %.2f",expr2);
diff --git a/1553/CH4/EX4.9/4Ex9.sce b/1553/CH4/EX4.9/4Ex9.sce
new file mode 100644
index 000000000..2c8a27a05
--- /dev/null
+++ b/1553/CH4/EX4.9/4Ex9.sce
@@ -0,0 +1,22 @@
+//Chapter 4 Ex 9
+
+clc;
+clear;
+close;
+
+//(i)
+x1=17.28/(2*3.6*0.2);
+mprintf("(i)The value of x is %.0f",x1);
+
+//(ii)
+x2=364.824/(3794.1696+36.4824-3648.24);
+mprintf("\n(ii)The value of x is %.0f",x2);
+
+//(iii)
+x3=poly(0,'x');
+for x3=1:0.1:10
+ if round(8.5-(5.5-(7.5+(2.8/x3)))*(4.25/0.04))==306
+ break;
+ end
+end
+mprintf("\n(iii)The value of x is %.1f",x3);