Помогите пожалуйста с программированием Delphi
3адано целое число типа LONGWORD. Получить из каждого байта символ, соответствующий этому числу. Алгоритм преобразования оформить в виде функции. Исходное число и результат вывести в символьной, двоичной и десятичной форме.
По дате
По рейтингу
Дарю функцию:
const
SIZE_OF_LONG_WORD=8;
type
TLongWordChars=packed array[0..SIZE_OF_LONG_WORD-1] of AnsiChar;
function LongWordToCharArray(_lwWord: LongWord): TLongWordChars;
var
r: TLongWordChars absolute _lwWord;
begin
Result:=r;
end;
Остальное скучно и неинтересно.
