xlang/test/fib.x

19 lines
202 B
Plaintext

main() {
// print 5th fibonacci number
print fib(5);
return 0;
}
fib(n) {
x0 = 1;
x1 = 1;
i = 0;
while i < n {
t = x0 + x1;
x0 = x1;
x1 = t;
i = i + 1;
}
return x0;
}