// $Id: fibo.ici,v 1.0 2003/01/03 11:14:00 dada Exp $ // http://dada.perl.it/shootout // // contributed by Tim Long static fib(n) { return n < 2 ? 1 : fib(n - 2) + fib(n - 1); } printf("%d\n", fib(argv[1] ? int(argv[1]) : 1));