Ответы и объяснения

Лучший Ответ!
2013-09-21T12:06:41+04:00
16 вроде как,если я поняла,твое задание
2013-09-21T12:07:01+04:00
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;