1 files changed, 17 insertions, 0 deletions
diff --git a/3808/CH4/EX4.14/Ex4_14.sce b/3808/CH4/EX4.14/Ex4_14.sce
new file mode 100644
index 000000000..ecf0c7486
--- /dev/null
+++ b/3808/CH4/EX4.14/Ex4_14.sce
@@ -0,0 +1,17 @@
+//Chapter 04:Number Theory and Cryptography
+
+clc;
+clear all;
+
+n1=input("Number 1:")
+n2=input("Number 2:")
+a=n1
+b=n2
+while n1 ~=n2
+    if n1>n2 then
+        n1=n1-n2
+    else
+        n2=n2-n1
+    end
+end
+mprintf("GCD(%d,%d) is:%d",a,b,n1)