Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- fun int fibo(int n) =
- if n == 0 then 0
- else if n == 1 then 1
- else fibo(n - 1) + fibo(n - 2)
- fun int factorial(int n) =
- if n == 0 then 1
- else n * factorial(n-1)
- fun bool getBool(bool b) =
- !!b
- fun bool nega(bool a) =
- a
- fun int write_int(int x) = write(x)
- fun [int] write_int_arr([int] x) = map(write_int, x)
- fun [int] main() =
- let n = read(int) in
- let z = iota(n) in
- write_int_arr(map(fn int (int x) => factorial(x+1), z))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement