RosettaCodeData/Task/Compile-time-calculation/Seed7/compile-time-calculation.seed7

9 lines
141 B
Plaintext

$ include "seed7_05.s7i";
const proc: main is func
local
const integer: factorial is !10;
begin
writeln(factorial);
end func;