Anonymous user
Detect division by zero: Difference between revisions
Added Delphi example
(Added Mathematica) |
(Added Delphi example) |
||
Line 339:
real inf/ inf: -nan ! Inf numerator
real nan/ nan: nan ! NaN numerator</pre>
=={{header|Delphi}}==
<lang Delphi>program DivideByZero;
{$APPTYPE CONSOLE}
uses SysUtils;
var
a, b: Integer;
begin
a := 1;
b := 0;
try
WriteLn(a / b);
except
on e: EZeroDivide do
Writeln(e.Message);
end;
end.</lang>
=={{header|E}}==
| |||