Language:
Русский
English
{Ptr.PAS}
▀▀▀▀▀▀▀▀▀▀▀
{Sample code for the Ptr function.}
var P: ^Byte;
begin
P := Ptr($40, $49);
Writeln('Current video mode is ', P^);
end.
 Ptr.PAS |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
|
|
|
|
|
|
Код для вставки:
 ::
 ::
 ::
ГОСТ ::
Поделиться:
|
|