Evaluate binomial coefficients: Difference between revisions

=={{header|D}}==

<lang d>import std.stdio, std.bigint;

T binomial(T)(/*in*/ T n, T k) /*pure nothrow*/ {

k = n - k;

T bc = 1;

bc = (bc * (n - k + i)) / i;

return bc;

}

void main() {

writefln("(%3d %3d) = %s", d[0], d[1], binomial(d[0], d[1]));

writeln("(100 50) = ", binomial(BigInt(100), BigInt(50)));

}</lang>

 

=={{header|Delphi}}==