diff options
Diffstat (limited to '3808/CH5/EX5.3/Ex5_3.sce')
| -rw-r--r-- | 3808/CH5/EX5.3/Ex5_3.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/3808/CH5/EX5.3/Ex5_3.sce b/3808/CH5/EX5.3/Ex5_3.sce new file mode 100644 index 000000000..cff1ffb1d --- /dev/null +++ b/3808/CH5/EX5.3/Ex5_3.sce @@ -0,0 +1,18 @@ +//Chapter 05: Induction and Recursion + +clc; +clear; + +function pow = power(i,n) +if n == 0 + pow = 1 +else + pow = i * power(i,n-1)//recursive function call +end +return pow +endfunction + +n=input("Enter the number whose power is to be found:") +po=input("Enter the power:") +p=power(n,po) +mprintf("%d to the power %d is %d",n,po,p) |