main := proc() { n := read_int(0) fib(n) exit(0) } fib := proc(n) { a := 0 b := 1 i := 0 while i < n { p(a) c := a + b a = b b = c i = i + 1 } print(a) } p := proc(x) { x2 := x print(x2) }