RosettaCodeData/Task/Compile-time-calculation/Oberon/compile-time-calculation.oberon

9 lines
147 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
MODULE CompileTime;
IMPORT
Out;
CONST
tenfac = 10*9*8*7*6*5*4*3*2;
BEGIN
Out.String("10! =");Out.LongInt(tenfac,0);Out.Ln
END CompileTime.