Language:
Русский
English
{GetMdRng.PAS}
▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the GetModeRange procedure.}
uses Graph;
var Lowest, Highest: Integer;
begin
GetModeRange(EGA64, Lowest, Highest);
Write('Lowest = ', Lowest);
Write(' Highest = ', Highest);
end.