vfp程序设计，急！

来源：百度知道 编辑：UC知道 时间：2024/06/17 16:46:36
从键盘输入任意实数M，统计该数的整数位数、小数位数及其该数的总位数
要求：不能用字符方法处理

input "输入数字：" to M
i=0
d=0
s=M
do while s>1
i=i+1
s=s/10
enddo
do while m<>int(m)
d=d+1
m=m*10
enddo
a=i+iif(d=0,0,d+1) &&这是在有小数时把小数点也算做一位，没小数就不算
? "整数位",i
? "小数位",d
? "总位数",a