faculty.jc

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

import stdlib;

// function main()

function float main( const array& args )
{
	if( args.length != 2 )
	{
		stdlib::Print("Usage: jilrun faculty.jc n\n");
		stdlib::Print("Where 0 < n < 171\n");
		return 0;
	}

	long n = stdlib::Atol( args[1] );

	return faculty( n );
}

// function faculty()

function float faculty( long n )
{
	float f = 1, g = 1;
	for( long m = 1; m < n; m++ )
		f *= ++g;
	return f;
}