1 files changed, 20 insertions, 0 deletions
diff --git a/413/CH1/EX1.1/Table_1.sce b/413/CH1/EX1.1/Table_1.sce
new file mode 100644
index 000000000..387fe3f9b
--- /dev/null
+++ b/413/CH1/EX1.1/Table_1.sce
@@ -0,0 +1,20 @@
+//The bisection method for f(x)=3*x+sin(x)-exp(x), starting from 0 and 1 in 13 iterations)
+
+clearglobal()
+clc;
+fx='3*x+sin(x)-exp(x)'//Define function here
+xa=0;   // intial value
+xb=1;  // final vale where root need to bracket
+n=13;  // no. of iterations
+x = xa;   fa=eval(fx);
+x = xb;   fb=eval(fx);
+   for i=1:n  
+   xc = (xa+xb)/2;  x = xc;  fc = eval(fx);  
+    X = [i,xa,xb,xc,fc];
+  disp(X)
+  if fc*fa < 0 then
+    xb = xc;
+  else xa = xc;
+  end;
+  end;
+