fib.jc

来自「The JILRunOnly project is a simple comma」· JC 代码 · 共 29 行

// fib.jc
// Calculate Fibonacci sequence for benchmarking purposes.

// imports
import stdlib;

// function main
function long main(const array& args)
{
	long ticks;

	stdlib::Print("*** FIB ***\n");

	ticks = stdlib::GetTicks();
	stdlib::Print( fib(32) );
	stdlib::Printf( "\ntime = %g\n", (stdlib::GetTicks() - ticks) / 1000.0 );

	return 0;
}

// function fib
function long fib(long n)
{
	if (n < 2)
		return 1;
	return fib( n-2 ) + fib( n-1 );
}