initial commit / add all books

1 files changed, 19 insertions, 0 deletions

diff --git a/1332/CH5/EX5.9/5_9.sce b/1332/CH5/EX5.9/5_9.sce
new file mode 100755
index 000000000..976a1d5af
--- /dev/null
+++ b/1332/CH5/EX5.9/5_9.sce
@@ -0,0 +1,19 @@
+//Example 5.9

+//Modified Newton Raphson Method

+//Page no. 165

+clc;clear;close;

+deff('x=f(x)','x=exp(x)-3*x-sin(x)')

+deff('x=f1(x)','x=exp(x)-3-cos(x)')

+printf('n\txn\t\t\f(xn)\t\tf1(xn)\t\tXn+1\t\tError\n')

+printf('-----------------------------------------------------------------------------------------------------\n')

+x0=0;e=0.00001

+for i=1:4

+    x1=x0-f(x0)/f1(x0)

+    e1=abs(x0-x1)

+    printf(' %i\t%.10f\t%.10f\t%.10f\t%.10f\t%.10f\n',i-1,x0,f(x0),f1(x0),x1,e1)

+    x0=x1;

+    if abs(x0)<e then

+        break;

+    end

+end

+printf('\n\nTherefore, the root is %.10f',x1)
\ No newline at end of file