如何换成二进制转换成十六进制？？ - VFP论坛

编程论坛 → 数据库技术 → 『 VFP论坛』 → 如何换成二进制转换成十六进制？？

标题：如何换成二进制转换成十六进制？？

只看楼主

FunnyClown

等　级：新手上路
帖　子：9
专家分：0
注　册：2017-12-14
结帖率：0

楼主

已结贴√ 问题点数：10 回复次数：2

如何换成二进制转换成十六进制？？

搜索更多相关主题的帖子: 二进制　转换　十六进制　

2017-12-15 18:30

mywisdom88

等　级：版主
威　望：190
帖　子：3125
专家分：8340
注　册：2015-3-25

第 2 楼

得分:5

你在学校，是不听过，8421码，如下的2进制数
10101100，每4位为1组，那就能分2组，1010 1100 = 8+0+2+0 8+4+0+0=10 12=AC(16进制)
以上就是算法的过程

2017-12-15 19:31

吹水佬

等　级：版主
威　望：432
帖　子：10064
专家分：41463
注　册：2014-5-20

第 3 楼

得分:5

accept "输入一个二进制数：" to bin
dec = 0
k = 0
FOR i=LEN(bin) TO 1 STEP -1
    IF SUBSTR(bin,i,1)=="1"
        dec = dec + BITLSHIFT(1,k)
    ENDIF
    k = k + 1
ENDFOR
? "十进制数为："+TRANSFORM(dec)
? "十六进制数为："+TRANSFORM(dec,"@0")

2017-12-15 19:44

参与讨论请移步原网站贴子：https://bbs.bccn.net/thread-483405-1-1.html