NegInfinity
Adam Boduch
NegInfinity
Moduł: Math
program FooApp;
{$APPTYPE CONSOLE}
uses
Math;
var
D : Double;
begin
D := NegInfinity;
Writeln(D);
if IsInfinite(D) then
Writeln('Wartość odpowiada nieskończoności');
Readln;
end.
Taki kod spowoduje wyświetlenie w oknie konsoli tekstu:
-Inf
Wartość odpowiada nieskończoności
Zobacz też: