主题：转进制的问题。
科比*布莱恩特
[专家分：40] 发布于 2008-04-29 16:21:00
怎样用QB写出(N)2转成(X)10?(只能用FOR!)
回复列表 （共1个回复）
沙发
54小诚 [专家分：90] 发布于 2008-04-29 16:50:00
cls
input a
la=len(str$(a))
for i=la to 0 step -1
c=val(mid$(str$(a),i,1))
b=b+c*2^i
next i
print b
简单!!!!!!!!你耍人啊!
[em22][em22][em22][em22][em22][em22][em22][em22][em22][em24][em24][em24][em24][em24][em60][em60][em60]
我来回复
您所在位置：