Нада число представить двоичными триадами 45107(8)
100 101 001 000 111, затем с<span>права налево разбить на двоичные тетрады по 4 разряда и записать алфавитом 16сс
0100 1010 0100 0111=4А47</span>
<em>// PascalABC.NET 3.2, сборка 1362 от 14.12.2016</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(10,-45,45); a.Println;
Swap(a[0],a[9]); a.Println
end.
<u>Пример</u>
32 -1 21 17 13 11 -7 14 -7 4
4 -1 21 17 13 11 -7 14 -7 32