Правила форума
Ord.PASЯзык:
Русский
English
{Ord.PAS}
{ Пример программы для функции Ord }
uses Crt;
type Colors = (RED, BLUE, GREEN);
begin
WriteLn('Порядковый номер BLUE равен ', Ord(BLUE));
WriteLn('ASCII код для символа "c" равен ', Ord('c'));
end.
type Colors = (RED, BLUE, GREEN);
begin
WriteLn('Порядковый номер BLUE равен ', Ord(BLUE));
WriteLn('ASCII код для символа "c" равен ', Ord('c'));
end.
::
::
::
