用QBASIC编写 二进制的数转化成十进制的数的程序,哪位朋友帮个忙?谢谢了 如题... 如题 展开 我来答 可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。 qbasic 二进制 十进制 朋友 搜索资料 2个回答 #热议# 为什么有人显老,有人显年轻? cwa9958 2008-09-10 · TA获得超过1884个赞 知道大有可为答主 回答量:2504 采纳率:0% 帮助的人:1985万 我也去答题访问个人页 关注 展开全部 d2="110011000100111"n=len(d2)for i=0 to n-1d10=d10+val(mid(d2,n-i,1))*2^inext print d10 本回答由提问者推荐 已赞过 已踩过< 你对这个回答的评价是? 评论 收起 傲视人间008 2008-09-15 · TA获得超过437个赞 知道答主 回答量:120 采纳率:0% 帮助的人:73.1万 我也去答题访问个人页 关注 展开全部 CLSINPUT N$FOR I = 1 TO LEN(N$)K = VAL(MID$(N$, I, 1))N = N + K * 2 ^ (LEN(N$) - I)NEXT IPRINT NEND 已赞过 已踩过< 你对这个回答的评价是? 评论 收起 推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询 为你推荐: