Правила форума
GetMdRng.PASЯзык:
Русский
English
{ Пример программы для процедур GetModeRange и SetGraphMode }
uses Graph;
var
Lowest, Highest : Integer;
begin
GetModeRange(EGA64, Lowest, Highest);
Write('Наименьший номер режима = ', Lowest);
Write('Наибольший номер режима = ', Highest);
end.
var
Lowest, Highest : Integer;
begin
GetModeRange(EGA64, Lowest, Highest);
Write('Наименьший номер режима = ', Lowest);
Write('Наибольший номер режима = ', Highest);
end.
::
::
::
