谁知道PASCLE的十进制转十六进制怎么编程？

先设一个字符串S:string;
然后
while n>0 do begin
k:=k mod 16;
n:=n div 16;
if k<10 then
s:=s+chr(k+ord('0'))
else
s:=s+chr(k+ord('A')-1);
end;
应该就可以了

前面的初始化工作就自己做了吧。。。。

原理就是“除以16取余数”进行迭代