foxJL

算法:

比如11271900转换成16进制是：ABFEDC
先拿16除11271900，商704493，余12
再拿16除704493，商44030，余13
再拿16除44030，商2751，余14
再拿16除2751，商171，余15
再拿16除171，商10，余11
再拿16除10，商0，余10
最后，倒着取这些：
10
11
15
14
13
12
然后按照这个表换算：
10=A
11=B
12=C
13=D
14=E
15=F
连起来就是：ABFEDC
复制代码

代码:

@echo off
set f=0123456789ABCDEF
set /p num=输入十进制数字:
:a
set /a mod = %num% %% 16
set /a num /=16
set en=%mod% %en%
if not %num% lss 1 (goto a)
for %%i in (%en%) do (call set/p=%%f:~%%i,1%%<nul)
pause>nul
复制代码

[ 本帖最后由 foxJL 于 2008-3-4 15:27 编辑 ]