hi.pas

Пример программы для функции Hi.

Код примера
 {Hi.PAS}
 
 { Пример программы для функции Hi }
 
 Var B : Byte;
 
 Begin
  B:=Hi($1234);   { $12 }
 End.

Скачать hi.pas