1 files changed, 12 insertions, 0 deletions
diff --git a/243/CH6/EX6.15/6_15.sce b/243/CH6/EX6.15/6_15.sce
new file mode 100755
index 000000000..097503f8e
--- /dev/null
+++ b/243/CH6/EX6.15/6_15.sce
@@ -0,0 +1,12 @@
+//Example No. 6_15
+//Synthetic Division
+//Pg No. 176
+clear ; close ; clc ;
+
+a = [-9 15 -7 1];
+b(4) = 0 ;
+for i = 3:-1:1
+    b(i) = a(i+1) + b(i+1)*3
+    printf('b%i = %f\n',i,b(i))
+end
+    disp(poly(b,'x','c'),'Thus the polynomial is')
+\ No newline at end of file