RosettaCodeData/Task/Infinity/Modula-2/infinity-1.mod2

9 lines
99 B
Plaintext

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