vfp6.0中怎样编写程序二进制转换十进制
答案:1 悬赏:80
解决时间 2022-01-01 02:16
- 提问者网友：贪了杯
- 2021-12-31 08:08
vfp6.0中怎样编写程序二进制转换十进制
最佳答案
- 二级知识专家网友：一袍清酒付
- 2021-12-31 08:44
以下代码没有VFP环境，未经调试：
set talk off
m=""
input "请输入n:" to n
do d2b with n
?n,"=(",m,")2"
return
procedure d2b
parameters x
if x>1
do factz with int(x/2)
store str(x%2,1,0)+m to m
endif
return追问do factz什么意思？运行什么文件？追答就是调用过程d2b（在下面，procedure d2b）追问你这是十进制转二进制吧，我问的是二进制转换十进制。。追答set talk off
n=0
acce "请输入一个二进制数:" to s
l=len(s)
for i=1 to l
a=subs(s,i,1)
n=n*2+val(a)
next i
? n
set talk off
m=""
input "请输入n:" to n
do d2b with n
?n,"=(",m,")2"
return
procedure d2b
parameters x
if x>1
do factz with int(x/2)
store str(x%2,1,0)+m to m
endif
return追问do factz什么意思？运行什么文件？追答就是调用过程d2b（在下面，procedure d2b）追问你这是十进制转二进制吧，我问的是二进制转换十进制。。追答set talk off
n=0
acce "请输入一个二进制数:" to s
l=len(s)
for i=1 to l
a=subs(s,i,1)
n=n*2+val(a)
next i
? n
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯