Что бы перевести десятичное число в шестнадцатеричную систему его необходимо последовательно делить на 16 до тех пор, пока не останется остаток, меньший или равный 15. Число в шестнадцатеричной системе записывается как последовательность цифр последнего результата деления и остатков от деления в обратном порядке.
Пример:
возьмем число 7467
7467/16=466 и 11 в остатке
466/16=29 и 2 в остатке
29/16=1 и 13 в остатке
и того получаем числа: 1 13 2 11
1 - 1
13 - D
2 - 2
11 - B
7467(10) = 1D2B(16)
возьмем твое число 137
137/16=8 и 9 в остатке
и того получаем 137(10) = 89(16)
так же для перевода из десятичных в шестнадчатиричные набросал программу на PascalABC
var
n : integer;
d : integer;
s : string;
begin
write('введите десятичное число: ');
readln(n);
repeat
if n <= 15 then begin</em>
d := n
end else begin
d := n-(n div 16)*16;
end;
case d of
10 : s += 'A';
11 : s += 'B';
12 : s += 'C';
13 : s += 'D';
14 : s += 'E';
15 : s += 'F';
else s += d.ToString;
end;
n := n div 16;
until n < 1;
s := reverseString(s);
writeln(s);
end.