diff options
Diffstat (limited to '3808/CH5/EX5.4/Ex5_4.sce')
-rw-r--r-- | 3808/CH5/EX5.4/Ex5_4.sce | 23 |
1 files changed, 23 insertions, 0 deletions
diff --git a/3808/CH5/EX5.4/Ex5_4.sce b/3808/CH5/EX5.4/Ex5_4.sce new file mode 100644 index 000000000..14e171890 --- /dev/null +++ b/3808/CH5/EX5.4/Ex5_4.sce @@ -0,0 +1,23 @@ +//Chapter 05: Induction and Recursion + +clc; +clear; + +function res=greatestcommondivisior(a,b) + if a==0 then +res=b + else +res=greatestcommondivisior(modulo(b,a),a) + end +return res +endfunction + +num1=input("Enter the first number:") +num2=input("Enter the second number:") +res_gcd=greatestcommondivisior(num1,num2) +mprintf("The gcd of %d , %d is %d",num1,num2,res_gcd) + +//By Using the inbuilt function,that is provided by Scilab +p=[num1,num2] +res=gcd(p) +mprintf("\nThe gcd of %d , %d is %d",num1,num2,res) |