summaryrefslogtreecommitdiff
path: root/3808/CH5/EX5.3/Ex5_3.sce
blob: cff1ffb1d2b4c594a79f6c64da43f6d1e75526aa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
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)