RosettaCodeData/Task/Compile-time-calculation/Pascal/compile-time-calculation.pas

12 lines
77 B
ObjectPascal

program in out;
const
X = 10*9*8*7*6*5*4*3*2*1 ;
begin
writeln(x);
end;