diff options
Diffstat (limited to '1553/CH24')
29 files changed, 308 insertions, 0 deletions
diff --git a/1553/CH24/EX24.1/24Ex1.sce b/1553/CH24/EX24.1/24Ex1.sce new file mode 100644 index 000000000..d72de0498 --- /dev/null +++ b/1553/CH24/EX24.1/24Ex1.sce @@ -0,0 +1,9 @@ +//chapter 24 Ex 1
+
+clc;
+clear;
+close;
+l=15; Diag=17;
+b=sqrt(Diag^2-l^2);
+area=l*b;
+printf("The area of the field is %d square meter",area);
diff --git a/1553/CH24/EX24.10/24Ex10.sce b/1553/CH24/EX24.10/24Ex10.sce new file mode 100644 index 000000000..90eaad16f --- /dev/null +++ b/1553/CH24/EX24.10/24Ex10.sce @@ -0,0 +1,8 @@ +//Chapter 24 Ex 10
+
+clc;
+clear;
+close;
+dia=3.8;
+A=((dia)^2)/2;
+mprintf("The area od the square whose diagonal is given is %.2f sq.meter",A);
\ No newline at end of file diff --git a/1553/CH24/EX24.12/24Ex12.sce b/1553/CH24/EX24.12/24Ex12.sce new file mode 100644 index 000000000..06aab367a --- /dev/null +++ b/1553/CH24/EX24.12/24Ex12.sce @@ -0,0 +1,11 @@ +//Chapter 24 Ex12
+
+clc;
+clear;
+close;
+side=1; //assuming side of square as 1
+area=side^2;
+nside=(1+(25/100))*side;
+narea=(nside)^2;
+increase=((narea-area)/area)*100;
+mprintf("The percentage change in area is %.2f percent",increase);
diff --git a/1553/CH24/EX24.13/24Ex13.sce b/1553/CH24/EX24.13/24Ex13.sce new file mode 100644 index 000000000..35be8c2ea --- /dev/null +++ b/1553/CH24/EX24.13/24Ex13.sce @@ -0,0 +1,17 @@ +//Chapter 24 Ex 13
+
+clc;
+clear;
+close;
+inc=3; dec=4;
+x=poly(0,'x');
+y=(x-7); //from given condition 1
+y=(3*x-12)/4; //from given condition 2
+for x=1:99
+ if (x-7)==((3*x-12)/4) then
+ break;
+ end
+end
+y=x-7;
+area=2*(x+y);
+mprintf("The perimeter of the rectangle is %d cm.",area);
\ No newline at end of file diff --git a/1553/CH24/EX24.14/24Ex14.sce b/1553/CH24/EX24.14/24Ex14.sce new file mode 100644 index 000000000..ffa713d11 --- /dev/null +++ b/1553/CH24/EX24.14/24Ex14.sce @@ -0,0 +1,17 @@ +//Chapter 24 Ex 14
+
+clc;
+clear;
+close;
+tc1=270; rate1=5;
+area1=tc1/rate1; //area of floor
+//given length is 3/2 of breadth.
+//breadth=x then length=(3*x/2) and area= (x*3*x)/2
+b=sqrt(area1*(2/3));
+l=(3/2)*b;
+tc2=1720; rate2=10;
+area2=tc2/rate2; //papered area
+area3=8; //given area of a door and 2 windows
+totarea=area2+area3;
+ht=totarea/(2*(l+b));
+mprintf("The length,bredth and height of the room are %d m,%d m,%d m respectively.",l,b,ht);
diff --git a/1553/CH24/EX24.15/24Ex15.sce b/1553/CH24/EX24.15/24Ex15.sce new file mode 100644 index 000000000..59d03d385 --- /dev/null +++ b/1553/CH24/EX24.15/24Ex15.sce @@ -0,0 +1,9 @@ +//Chapter 24 Ex 15
+
+clc;
+clear;
+close;
+a=13; b=14; c=15;
+s=(a+b+c)/2;
+area=sqrt(s*(s-a)*(s-b)*(s-c));
+mprintf("The area of triangle is %d sq.cm",area);
diff --git a/1553/CH24/EX24.16/24Ex16.sce b/1553/CH24/EX24.16/24Ex16.sce new file mode 100644 index 000000000..a44f483c1 --- /dev/null +++ b/1553/CH24/EX24.16/24Ex16.sce @@ -0,0 +1,9 @@ +//Chapter 24 Ex 16
+
+clc;
+clear;
+close;
+base=12; hypo=13;
+h=sqrt((hypo)^2-(base)^2);
+area=(1/2)*base*h;
+mprintf("The area of a right angled triangle is %d sq.cm.",area);
\ No newline at end of file diff --git a/1553/CH24/EX24.17/24Ex17.sce b/1553/CH24/EX24.17/24Ex17.sce new file mode 100644 index 000000000..aca0478d6 --- /dev/null +++ b/1553/CH24/EX24.17/24Ex17.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 17
+
+clc;
+clear;
+close;
+rate=24.68; costfield=333.18;
+Area=(costfield/rate)*10000;
+altitude=sqrt(Area/((1/2)*3));
+base=3*altitude;
+mprintf("The altitude and base are %d meter and %d meter",altitude,base);
diff --git a/1553/CH24/EX24.18/24Ex18.sce b/1553/CH24/EX24.18/24Ex18.sce new file mode 100644 index 000000000..feeac1bfc --- /dev/null +++ b/1553/CH24/EX24.18/24Ex18.sce @@ -0,0 +1,11 @@ +//chapter 24 Ex 18
+
+clc;
+clear;
+close;
+altitude=8; perimeter=32;
+//from given the equation formed is x^2=(8^2)+(16-x)^2
+side=320/32;
+base=perimeter-2*side;
+area=(1/2)*base*side;
+mprintf("The area of the triangle is %.0f square cm",area);
diff --git a/1553/CH24/EX24.19/24Ex19.sce b/1553/CH24/EX24.19/24Ex19.sce new file mode 100644 index 000000000..5d2d20a14 --- /dev/null +++ b/1553/CH24/EX24.19/24Ex19.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 19
+
+clc;
+clear;
+close;
+l=3*sqrt(3);
+area=((sqrt(3))/4)*l^2;
+height=area/((1/2)*l);
+mprintf("The height of %.1f cm",height);
+
diff --git a/1553/CH24/EX24.2/24Ex2.sce b/1553/CH24/EX24.2/24Ex2.sce new file mode 100644 index 000000000..2b134d10b --- /dev/null +++ b/1553/CH24/EX24.2/24Ex2.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 2
+
+clc;
+clear;
+close;
+l=13; b=9; w=75/100; rate=12.4;
+area=l*b;
+Length=area/w;
+cost=Length*rate;
+printf("The cost of carpeting is Rs. %4.2f",cost);
diff --git a/1553/CH24/EX24.21/24Ex21.sce b/1553/CH24/EX24.21/24Ex21.sce new file mode 100644 index 000000000..efde14fd4 --- /dev/null +++ b/1553/CH24/EX24.21/24Ex21.sce @@ -0,0 +1,8 @@ +//chapter 24 Ex 21
+
+clc;
+clear;
+close;
+area=72;
+h=sqrt(area/2);
+mprintf("The height of parallelogram is %d cm",h);
diff --git a/1553/CH24/EX24.22/24Ex22.sce b/1553/CH24/EX24.22/24Ex22.sce new file mode 100644 index 000000000..99b91e155 --- /dev/null +++ b/1553/CH24/EX24.22/24Ex22.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 22
+
+clc;
+clear;
+close;
+side=20; diagonal1=24;
+x=sqrt(side^2-(diagonal1/2)^2);
+diagonal2=2*x;
+area=(1/2)*(diagonal1*diagonal2);
+mprintf("The area of rhombus is %d square cm",area);
diff --git a/1553/CH24/EX24.23/24Ex23.sce b/1553/CH24/EX24.23/24Ex23.sce new file mode 100644 index 000000000..2722e5180 --- /dev/null +++ b/1553/CH24/EX24.23/24Ex23.sce @@ -0,0 +1,16 @@ +//Chapter 24 Ex 23
+
+clc;
+clear;
+close;
+// consider two parallel sides of trapezium as a and b
+a=poly(0,'a');
+b=(a-4); //from given condition 1
+b=(50-a); //from given condition 2
+for a=1:99
+ if (a-4)==(50-a) then
+ break;
+ end
+end
+b=a-4;
+mprintf("The parallel sides of trapezium are %d cm and %d cm",a,b);
\ No newline at end of file diff --git a/1553/CH24/EX24.24/24Ex24.sce b/1553/CH24/EX24.24/24Ex24.sce new file mode 100644 index 000000000..93ddbca51 --- /dev/null +++ b/1553/CH24/EX24.24/24Ex24.sce @@ -0,0 +1,8 @@ +//chapter 24 Ex 24
+
+clc;
+clear;
+close;
+area=9856;
+radius=sqrt(area/%pi);
+mprintf("The length of rope is %d cm",radius);
diff --git a/1553/CH24/EX24.25/24Ex25.sce b/1553/CH24/EX24.25/24Ex25.sce new file mode 100644 index 000000000..f85a208e6 --- /dev/null +++ b/1553/CH24/EX24.25/24Ex25.sce @@ -0,0 +1,12 @@ +//chapter 24 Ex 25
+
+clc;
+clear;
+close;
+a=13.86;
+rate=4.4;
+area1=a*10000;
+radius=sqrt(area1/%pi);
+circumference=2*(%pi)*radius;
+cost=rate*circumference;
+mprintf("The area is Rs.%.0f",cost);
diff --git a/1553/CH24/EX24.26/24Ex26.sce b/1553/CH24/EX24.26/24Ex26.sce new file mode 100644 index 000000000..cd126b78d --- /dev/null +++ b/1553/CH24/EX24.26/24Ex26.sce @@ -0,0 +1,10 @@ +//Chapter 24 Ex 26
+
+clc;
+clear;
+close;
+dia=140; s=66;
+speed=(66*1000)/60; //converting into meter/min or distance to be covered in 1 min
+circumference=2*(%pi)*(dia/(2*100));
+number=speed/circumference;
+mprintf("The number of revolutions per min are %d",number);
\ No newline at end of file diff --git a/1553/CH24/EX24.27/24Ex27.sce b/1553/CH24/EX24.27/24Ex27.sce new file mode 100644 index 000000000..90774b701 --- /dev/null +++ b/1553/CH24/EX24.27/24Ex27.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 27
+
+clc;
+clear;
+close;
+rev=1000;
+distTotal=88;
+dist=(distTotal/1000)*rev;
+rad=dist/(2*(%pi));
+mprintf("The radius of wheel is %d meter",rad);
diff --git a/1553/CH24/EX24.28/24Ex28.sce b/1553/CH24/EX24.28/24Ex28.sce new file mode 100644 index 000000000..caf5db008 --- /dev/null +++ b/1553/CH24/EX24.28/24Ex28.sce @@ -0,0 +1,9 @@ +//Chapter 24 Ex 28
+
+clc;
+clear;
+close;
+circum1=440; path=14;
+r=circum1/(2*(%pi));
+Radius=r+path;
+mprintf("The radius of outer circle is %d meter",Radius);
\ No newline at end of file diff --git a/1553/CH24/EX24.29/24Ex29.sce b/1553/CH24/EX24.29/24Ex29.sce new file mode 100644 index 000000000..836dbaa8e --- /dev/null +++ b/1553/CH24/EX24.29/24Ex29.sce @@ -0,0 +1,10 @@ +//Chapter 24 Ex 29
+
+clc;
+clear;
+close;
+circumI=352/7; circumO=528/7;
+r=circumI/(2*(%pi));
+R=circumO/(2*(%pi));
+width=(R-r);
+mprintf("The widht of the ring is %d meter",width);
\ No newline at end of file diff --git a/1553/CH24/EX24.3/24Ex3.sce b/1553/CH24/EX24.3/24Ex3.sce new file mode 100644 index 000000000..5832ab164 --- /dev/null +++ b/1553/CH24/EX24.3/24Ex3.sce @@ -0,0 +1,12 @@ +//chapter 24 Ex 3
+
+clc;
+clear;
+close;
+
+l=13; b=9; w=75/100; //converting into meter
+rate=12.4;
+area=l*b;
+lCarpet=area/w;
+cost=lCarpet*rate;
+mprintf("The cost for carpeting is Rs.%.2f",cost);
diff --git a/1553/CH24/EX24.30/24Ex30.sce b/1553/CH24/EX24.30/24Ex30.sce new file mode 100644 index 000000000..a3e7caf46 --- /dev/null +++ b/1553/CH24/EX24.30/24Ex30.sce @@ -0,0 +1,8 @@ +//Chapter 24 Ex 30
+
+clc;
+clear;
+close;
+area=(66/7); deg=120;
+r=sqrt((area*360)/((%pi)*deg));
+mprintf("The radius of the circle is %d cm.",r);
\ No newline at end of file diff --git a/1553/CH24/EX24.32/24Ex32.sce b/1553/CH24/EX24.32/24Ex32.sce new file mode 100644 index 000000000..b3c70f313 --- /dev/null +++ b/1553/CH24/EX24.32/24Ex32.sce @@ -0,0 +1,11 @@ +//Chapter 24 Ex 32
+
+clc;
+clear;
+close;
+R=1; // assuming radius of the circle is 1.
+NR=(50/100)*R;
+OArea=(%pi)*(R^2);
+NArea=(%pi)*(NR^2);
+dec=((OArea-NArea)*100)/OArea;
+mprintf("The percentage decrease in area of circle is %d percent",dec);
\ No newline at end of file diff --git a/1553/CH24/EX24.4/24Ex4.sce b/1553/CH24/EX24.4/24Ex4.sce new file mode 100644 index 000000000..55a12668e --- /dev/null +++ b/1553/CH24/EX24.4/24Ex4.sce @@ -0,0 +1,10 @@ +//chapter 24 Ex 4
+
+clc;
+clear;
+diagonal=17;
+perimeter=46;
+//perimeter=2(l+b), area=l*b, diagonal^2=l^2+b^2 using hypotenus
+//using above conditions, the equation diagonal^2+2l*b=(perimeter/2)^2
+area=((perimeter/2)^2-diagonal^2)/2;
+mprintf("The area of rectangle is %d square cm",area);
diff --git a/1553/CH24/EX24.5/24Ex5.sce b/1553/CH24/EX24.5/24Ex5.sce new file mode 100644 index 000000000..a52d21378 --- /dev/null +++ b/1553/CH24/EX24.5/24Ex5.sce @@ -0,0 +1,9 @@ +//Chapter 24 Ex5
+
+clc;
+clear;
+close;
+//consider breadht=x and length=2x as given. Thus solving statement we get following equation.
+//(2*x-5)(x+5)-2*x*x=75 and solving it we get
+x=(75+25)/5;
+mprintf("The length of rectangle is %d cm.",x);
\ No newline at end of file diff --git a/1553/CH24/EX24.6/24Ex6.sce b/1553/CH24/EX24.6/24Ex6.sce new file mode 100644 index 000000000..cbb813b34 --- /dev/null +++ b/1553/CH24/EX24.6/24Ex6.sce @@ -0,0 +1,9 @@ +//chapter 24 Ex 6
+
+clc;
+clear;
+close;
+excess=5/100; deficit=4/100;
+Error=((1+excess)*(1-deficit))-1;
+ErrorPercent=Error*100;
+mprintf("The percentage error is %.1f percent",ErrorPercent);
diff --git a/1553/CH24/EX24.7/24Ex7.sce b/1553/CH24/EX24.7/24Ex7.sce new file mode 100644 index 000000000..17ea2f41b --- /dev/null +++ b/1553/CH24/EX24.7/24Ex7.sce @@ -0,0 +1,11 @@ +//Chapter 24 Ex 7
+
+clc;
+clear;
+close;
+l=110; b=65; w=2.5; cost=80;
+A1=l*b; //area of plot
+A2=(l-2*w)*(b-2*w); //area of plot excluding path
+A3=A1-A2; // area of path
+CP=A3*(cost/100);
+mprintf("The cost of gravelling the path at 80 paise per sq. metre is Rs.%d",CP);
\ No newline at end of file diff --git a/1553/CH24/EX24.8/24Ex8.sce b/1553/CH24/EX24.8/24Ex8.sce new file mode 100644 index 000000000..186380d54 --- /dev/null +++ b/1553/CH24/EX24.8/24Ex8.sce @@ -0,0 +1,12 @@ +//chapter 24 Ex 8
+
+clc;
+clear;
+close;
+peri1=40; peri2=32;
+side1=peri1/4; //side=perimeter/number of sides
+side2=peri2/4;
+area3=side1^2-side2^2; //given
+side3=sqrt(area3);
+peri3=side3*4;
+mprintf("The perimeter of 3rd square is %d cm",peri3);
diff --git a/1553/CH24/EX24.9/24Ex9.sce b/1553/CH24/EX24.9/24Ex9.sce new file mode 100644 index 000000000..9d1873fb7 --- /dev/null +++ b/1553/CH24/EX24.9/24Ex9.sce @@ -0,0 +1,12 @@ +//chapter 24 Ex 9
+
+clc;
+clear;
+close;
+l=5*100+55; //converting to centimeter
+b=3*100+74;
+area=l*b;
+sideLargest=gcd(uint32([l b]));
+areatile=sideLargest^2;
+number=area/areatile;
+mprintf("The number of tiles required are %d",number);
|