MaxInt
Adam Boduch
MaxInt
Moduł: System
program Foo;
{$APPTYPE CONSOLE}
uses
Math, SysUtils;
begin
Writeln('Integer: ', MaxInt, ' -- ');
Writeln('LongInt: ', MaxLongInt, ' -- ');
Writeln('Comp: ', MaxComp, ' -- ', MinComp);
Writeln('Double: ', MaxDouble, ' -- ', MinDouble);
Writeln('Single: ', MaxSingle, ' -- ', MinSingle);
Writeln('Extended: ', MaxExtended, ' -- ', MinExtended);
Writeln('TDateTime: ', MaxDateTime, ' -- ', MinDateTime);
Readln;
end.
Niestety w module System nie zadeklarowano stałej MinInt, minimalną możliwą wartość typu Integer możemy pobrać korzystając z funkcji Low: Low(Integer)
.
Zobacz też: