summaryrefslogtreecommitdiff
path: root/1322/CH14
diff options
context:
space:
mode:
Diffstat (limited to '1322/CH14')
-rwxr-xr-x1322/CH14/EX14.1/100ex1.sce7
-rwxr-xr-x1322/CH14/EX14.10/104ex5.sce9
-rwxr-xr-x1322/CH14/EX14.11/104ex6.sce13
-rwxr-xr-x1322/CH14/EX14.12/105ex1.sce11
-rwxr-xr-x1322/CH14/EX14.13/105ex2.sce10
-rwxr-xr-x1322/CH14/EX14.14/105ex3.sce10
-rwxr-xr-x1322/CH14/EX14.15/106ex1.sce9
-rwxr-xr-x1322/CH14/EX14.16/106ex2.sce10
-rwxr-xr-x1322/CH14/EX14.17/106ex3.sce12
-rwxr-xr-x1322/CH14/EX14.18/108ex1.sce12
-rwxr-xr-x1322/CH14/EX14.19/108ex2.sce8
-rwxr-xr-x1322/CH14/EX14.2/100ex2.sce7
-rwxr-xr-x1322/CH14/EX14.20/108ex3.sce7
-rwxr-xr-x1322/CH14/EX14.21/108ex4.sce8
-rwxr-xr-x1322/CH14/EX14.22/109ex1.sce10
-rwxr-xr-x1322/CH14/EX14.23/109ex2.sce12
-rwxr-xr-x1322/CH14/EX14.3/102ex1.sce10
-rwxr-xr-x1322/CH14/EX14.4/102ex2.sce6
-rwxr-xr-x1322/CH14/EX14.5/102ex3.sce9
-rwxr-xr-x1322/CH14/EX14.6/104ex1.sce8
-rwxr-xr-x1322/CH14/EX14.7/104ex2.sce8
-rwxr-xr-x1322/CH14/EX14.8/104ex3.sce8
-rwxr-xr-x1322/CH14/EX14.9/104ex4.sce8
23 files changed, 212 insertions, 0 deletions
diff --git a/1322/CH14/EX14.1/100ex1.sce b/1322/CH14/EX14.1/100ex1.sce
new file mode 100755
index 000000000..6ac5d60e7
--- /dev/null
+++ b/1322/CH14/EX14.1/100ex1.sce
@@ -0,0 +1,7 @@
+
+//factors of 6a^2 + 3ac
+clear;
+clc;
+close;
+p=string('6*a^2+3*a*c ')
+disp('=> 3a(2a+c)')
diff --git a/1322/CH14/EX14.10/104ex5.sce b/1322/CH14/EX14.10/104ex5.sce
new file mode 100755
index 000000000..963e00213
--- /dev/null
+++ b/1322/CH14/EX14.10/104ex5.sce
@@ -0,0 +1,9 @@
+
+//x^2+12*x-28
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=x^2+12*x-28;
+factors(p)
+
diff --git a/1322/CH14/EX14.11/104ex6.sce b/1322/CH14/EX14.11/104ex6.sce
new file mode 100755
index 000000000..019a3e157
--- /dev/null
+++ b/1322/CH14/EX14.11/104ex6.sce
@@ -0,0 +1,13 @@
+
+//a^2-8*a*b-48*b^2
+clear;
+clc;
+close;
+a=poly(0,'a');
+p=a^2-8*a-48;
+factors(p)
+mprintf( "the second letter b will appear in 1st term of each factor")
+ans(1)="(4b+a)";
+ans(2)="(-12b+a)"
+
+
diff --git a/1322/CH14/EX14.12/105ex1.sce b/1322/CH14/EX14.12/105ex1.sce
new file mode 100755
index 000000000..dacadbe14
--- /dev/null
+++ b/1322/CH14/EX14.12/105ex1.sce
@@ -0,0 +1,11 @@
+
+//2*x^2+7*x+3
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=2*x^2+7*x+3;
+factors(p);
+ans(2)=ans(2)*2;
+disp(ans(1),ans(2),"the factors of 2*x^2+7*x+3 are")
+
diff --git a/1322/CH14/EX14.13/105ex2.sce b/1322/CH14/EX14.13/105ex2.sce
new file mode 100755
index 000000000..3506d6878
--- /dev/null
+++ b/1322/CH14/EX14.13/105ex2.sce
@@ -0,0 +1,10 @@
+
+//6*x^2+17*x-3
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=6*x^2+17*x-3;
+factors(p);
+ans(2)=ans(2)*6;//multiply by 6 the p1 factors to get the original factors of p
+disp(ans(1),ans(2),"the factors of 6*x^2+17*x-3 are")
diff --git a/1322/CH14/EX14.14/105ex3.sce b/1322/CH14/EX14.14/105ex3.sce
new file mode 100755
index 000000000..0eeabfc40
--- /dev/null
+++ b/1322/CH14/EX14.14/105ex3.sce
@@ -0,0 +1,10 @@
+
+//4*x^2-17*x-15
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=4*x^2-17*x-15;
+factors(p);
+ans(2)=ans(2)*4;
+disp(ans(1),ans(2),"the factors of 4*x^2-17*x-15 are")
diff --git a/1322/CH14/EX14.15/106ex1.sce b/1322/CH14/EX14.15/106ex1.sce
new file mode 100755
index 000000000..3480c8bc9
--- /dev/null
+++ b/1322/CH14/EX14.15/106ex1.sce
@@ -0,0 +1,9 @@
+
+//x^2+6*x+9
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=x^2+6*x+9;
+factors(p);
+disp(ans(1),"x^2+6*x+9 is square of binomial expression ")
diff --git a/1322/CH14/EX14.16/106ex2.sce b/1322/CH14/EX14.16/106ex2.sce
new file mode 100755
index 000000000..b33aab490
--- /dev/null
+++ b/1322/CH14/EX14.16/106ex2.sce
@@ -0,0 +1,10 @@
+
+//4*x^2+6*x+9
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=4*x^2+6*x+9
+mprintf("is not a complete square")
+//the 1st and 3rd terms are squares of 3and 2x
+//for complete square the middle term must be +(2*sqrt(4x^2)*sqrt(9))=+12x
diff --git a/1322/CH14/EX14.17/106ex3.sce b/1322/CH14/EX14.17/106ex3.sce
new file mode 100755
index 000000000..5323841e3
--- /dev/null
+++ b/1322/CH14/EX14.17/106ex3.sce
@@ -0,0 +1,12 @@
+
+//4*x^2-20*x+25
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=4*x^2-20*x+25
+factors(p);
+disp(ans(1)*2,"is the complete square of binomial")
+//disp("the 1st and 3rd terms are squares of 5 and 2x")
+//disp("for complete square the middle term must be (2*sqrt(4*x^2)*sqrt(25)=20x")
+
diff --git a/1322/CH14/EX14.18/108ex1.sce b/1322/CH14/EX14.18/108ex1.sce
new file mode 100755
index 000000000..da370ccc4
--- /dev/null
+++ b/1322/CH14/EX14.18/108ex1.sce
@@ -0,0 +1,12 @@
+
+//100*x^2-1
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=100*x^2-1;
+factors(p);
+ans(1)=10*ans(1);
+ans(2)=10*ans(2);
+disp(ans(1),ans(2),"the factors of 100*x^2-1 are")
+
diff --git a/1322/CH14/EX14.19/108ex2.sce b/1322/CH14/EX14.19/108ex2.sce
new file mode 100755
index 000000000..428879163
--- /dev/null
+++ b/1322/CH14/EX14.19/108ex2.sce
@@ -0,0 +1,8 @@
+
+//36*a^2*b^2-25
+clear;
+clc;
+close;
+//the numbers squared are 6ab and 5")
+disp("36*a^2*b^2-25=(6ab+5)(6ab-5)")
+
diff --git a/1322/CH14/EX14.2/100ex2.sce b/1322/CH14/EX14.2/100ex2.sce
new file mode 100755
index 000000000..acfae217a
--- /dev/null
+++ b/1322/CH14/EX14.2/100ex2.sce
@@ -0,0 +1,7 @@
+
+//5*x^2*y^2-10*x^2*y+20*y^2
+clear;
+clc;
+close;
+mprintf("\n the highest common factor to each term is 5 and other factor is y \n")
+disp('5y(x^2y-2x^2+4y)')
diff --git a/1322/CH14/EX14.20/108ex3.sce b/1322/CH14/EX14.20/108ex3.sce
new file mode 100755
index 000000000..0387dc63c
--- /dev/null
+++ b/1322/CH14/EX14.20/108ex3.sce
@@ -0,0 +1,7 @@
+
+//factorize (a+b)^2 - c^2
+clear;
+clc;
+close;
+//using the formula, a^2-b^2=(a+b)(a-b)
+val=string('(a+b+c)(a+b-c)')
diff --git a/1322/CH14/EX14.21/108ex4.sce b/1322/CH14/EX14.21/108ex4.sce
new file mode 100755
index 000000000..c0069ef8f
--- /dev/null
+++ b/1322/CH14/EX14.21/108ex4.sce
@@ -0,0 +1,8 @@
+
+//factorize (a+b)^2 - (c-a)^2
+clear;
+clc;
+close;
+//using the formula, a^2-b^2=(a+b)(a-b)
+val=string('(b+c)(2a+b-c)')
+
diff --git a/1322/CH14/EX14.22/109ex1.sce b/1322/CH14/EX14.22/109ex1.sce
new file mode 100755
index 000000000..f8c4d9373
--- /dev/null
+++ b/1322/CH14/EX14.22/109ex1.sce
@@ -0,0 +1,10 @@
+
+clear;
+clc;
+close;
+function[val]=formulae(a,b)
+ val=(a+b)*(a-b)
+endfunction
+
+val=formulae(47.5,22.5)
+
diff --git a/1322/CH14/EX14.23/109ex2.sce b/1322/CH14/EX14.23/109ex2.sce
new file mode 100755
index 000000000..ab2c8c518
--- /dev/null
+++ b/1322/CH14/EX14.23/109ex2.sce
@@ -0,0 +1,12 @@
+
+//area of ring between 2 concentric circles.
+//given,r1=97mm,r2=83mm
+clear;
+clc;
+close;
+r1=97;r2=83;
+//the area of ring is difference between the areas of 2 circles
+diff_in_area=(r1^2-r2^2);
+mprintf("difference in area=%ipi mm^2",diff_in_area)
+
+
diff --git a/1322/CH14/EX14.3/102ex1.sce b/1322/CH14/EX14.3/102ex1.sce
new file mode 100755
index 000000000..e0ff5b864
--- /dev/null
+++ b/1322/CH14/EX14.3/102ex1.sce
@@ -0,0 +1,10 @@
+
+//factors of a^2+cd+ad+ac
+clear;
+clc;
+close;
+mprintf(" \n (a^2+ac)+(ad+cd) => a(a+c)+d(a+d) \n")
+mprintf("the factors are:")
+val=string('(a+c)(a+d)')
+
+
diff --git a/1322/CH14/EX14.4/102ex2.sce b/1322/CH14/EX14.4/102ex2.sce
new file mode 100755
index 000000000..469bf8f8c
--- /dev/null
+++ b/1322/CH14/EX14.4/102ex2.sce
@@ -0,0 +1,6 @@
+
+//factorize, if possible,ab+ac+bc+bd
+clear;
+clc;
+close;
+mprintf("\n there are no factors of this expression")
diff --git a/1322/CH14/EX14.5/102ex3.sce b/1322/CH14/EX14.5/102ex3.sce
new file mode 100755
index 000000000..1d48e66ee
--- /dev/null
+++ b/1322/CH14/EX14.5/102ex3.sce
@@ -0,0 +1,9 @@
+
+//factors of ab-5a-3b+15
+clear;
+clc;
+close;
+//by arrangement into suitable pairs,
+mprintf("(ab-5a)-(3b-15) => a(b-5)-3(b-5)")
+mprintf("\n the factors are: \n")
+val=string('(b-5)(a-3)')
diff --git a/1322/CH14/EX14.6/104ex1.sce b/1322/CH14/EX14.6/104ex1.sce
new file mode 100755
index 000000000..bbcfe9ffe
--- /dev/null
+++ b/1322/CH14/EX14.6/104ex1.sce
@@ -0,0 +1,8 @@
+
+//x^2+13*x+36
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=x^2+13*x+36;
+factors(p)
diff --git a/1322/CH14/EX14.7/104ex2.sce b/1322/CH14/EX14.7/104ex2.sce
new file mode 100755
index 000000000..5ea0981c8
--- /dev/null
+++ b/1322/CH14/EX14.7/104ex2.sce
@@ -0,0 +1,8 @@
+
+//x^2-13*x+36
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=x^2-13*x+36;
+factors(p)
diff --git a/1322/CH14/EX14.8/104ex3.sce b/1322/CH14/EX14.8/104ex3.sce
new file mode 100755
index 000000000..7103b7240
--- /dev/null
+++ b/1322/CH14/EX14.8/104ex3.sce
@@ -0,0 +1,8 @@
+
+//y^2-13*y+30
+clear;
+clc;
+close;
+y=poly(0,'y');
+p=y^2-13*y+30;
+factors(p)
diff --git a/1322/CH14/EX14.9/104ex4.sce b/1322/CH14/EX14.9/104ex4.sce
new file mode 100755
index 000000000..91259d4ec
--- /dev/null
+++ b/1322/CH14/EX14.9/104ex4.sce
@@ -0,0 +1,8 @@
+
+//x^2-5*x-36
+clear;
+clc;
+close;
+x=poly(0,'x');
+p=x^2-5*x-36;
+factors(p)