1 files changed, 21 insertions, 0 deletions
diff --git a/413/CH7/EX7.1/Example_7_1.sce b/413/CH7/EX7.1/Example_7_1.sce
new file mode 100644
index 000000000..69dee877d
--- /dev/null
+++ b/413/CH7/EX7.1/Example_7_1.sce
@@ -0,0 +1,21 @@
+clc
+clear
+x=-3
+function a=f(x)
+    a=exp(x)+2-cos(x);
+endfunction
+h=1
+  y=f(x)
+y1=f(x+h)
+while(abs(y-y1)>=0.00001)
+    y=f(x)
+   y1=f(x+h)
+     while(y>y1)
+    y=f(x)
+    y1=f(x+h)
+    T=[x+h, y1]
+    disp(T)
+     x=x+h
+     end 
+     h=-h/4
+     end
+\ No newline at end of file