Question

10 в 16-тиричной перевести в десятичную:)

Answer 1

16 вроде как,если я поняла,твое задание

Answer 2

s := 'abcdef';
while (n > 0) do
begin
t := n mod 16;
if (t <= 9) then write( t ) else write( s[ t-9 ] );
n := n div 16;
end;