RosettaCodeData/Task/Infinity/Modula-2/infinity-1.mod2
2023-07-01 13:44:08 -04:00

8 lines
99 B
Text

MODULE inf;
IMPORT InOut;
BEGIN
InOut.WriteReal (1.0 / 0.0, 12, 12);
InOut.WriteLn
END inf.