в шестнадцатеричную строку.. Пожскажите пожалуйста как можно следить
за знаком(если отр число то переводить его абс. величину чтоли?), если нам дано
конекретное чило а, а не массив..я не могу никак додуматься..
uses crt;
var a,i:byte;
t:array[1..8] of word;
begin
clrscr;
writeln('vvedite a');
readln(a);
i:=1;
repeat
t[i]:=a mod 16 +65;
a:=a div 16;
i:=i+1
until a=0;
for i:=1 to 3 do
write(t[i]);
end.