vfp6.0中怎样编写程序二进制转换十进制
答案:1 悬赏:70 手机版
解决时间 2021-03-20 08:08
- 提问者网友：浪荡绅士
- 2021-03-19 10:30
vfp6.0中怎样编写程序二进制转换十进制
最佳答案
- 五星知识达人网友：逐風
- 2021-03-19 11:14
以下代码没有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
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯