Язык:
Русский
English
{Ptr.PAS}
{ Пример программы для функции Ptr }
var
P : ^Byte;
begin
P := Ptr($40, $49);
WriteLn('Текущий видеорежим - ', P^);
end.
P : ^Byte;
begin
P := Ptr($40, $49);
WriteLn('Текущий видеорежим - ', P^);
end.
 Ptr.PAS |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
|
|
|
|
|
|
Код для вставки:
 ::
 ::
 ::
ГОСТ ::
Поделиться:
|
|