VFP程序改错1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)对其中的2条

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/23 16:19:58
VFP程序改错1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)对其

VFP程序改错1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)对其中的2条
VFP程序改错
1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)
对其中的2条错误语句进行修改
clear
input '请输入5位正整数:' to Nmoney
Cmoney=allt(str(nmoney))
Cstring1='零壹贰叁肆伍陆柒捌玖'
Cstring2='万仟佰拾元'
Cresult=0
For n=1 to len(Cmoney)
C=substr(cmoney,n)
Cresult=Cresult+subs(Cstring1,val(c)*2+1,2)+subs(Cstring2,n*2-1,2)
Endfor
Wait windows '大写金额为:'+Cresult

VFP程序改错1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)对其中的2条
修改后的完整程序如下:
clear
input '请输入5位正整数:' to Nmoney
Cmoney=allt(str(nmoney))
Cstring1='零壹贰叁肆伍陆柒捌玖'
Cstring2='元拾佰仟万'
Cresult=''
For n=1 to len(Cmoney)
C=substr(cmoney,n,1)
Cresult=Cresult + subs(Cstring1,val(c)*2+1,2)+subs(Cstring2,(len(Cmoney)-n)*2+1,2)
Endfor
Wait windows '大写金额为:'+Cresult
不过本程序所谓的大写转换是不正确的,3002正确的结果应该是叁千零贰元,可以参考我空间的文章.

VFP程序改错1、pcode4:下列程序的功能是将小写金额(假设小于10万且无小数位)转换为中文大写形式.例如,213转换为“贰佰壹拾叁元”,3002转换为“叁仟零佰零拾贰元”.(2006Q02)对其中的2条 vfp程序改错怎么做 求高手解答vfp程序改错题! vfp 1+2+...+99+100的程序 vfp程序题一道 vfp程序问题 vfp程序疑问 vfp 下列循环程序执行的次数是 for a=1 to 100 step -2 VFP编写程序,计算:s=1!+2!+3!+.+10! vfp数字金字塔的程序 1 121 12321 用vfp:编写程序1到20偶数个数 vfp问题!改错!Set talk offCLEARNsum=0For n= 1 to 10Nsum=nsum+jc(n)Enddo? nsumFunction jcParameter xS=1For m=1 to xS=S*mEndforReturnEndfunc下列程序的功能是:计算数列1!+2!+3!+……+10!之和,并输出结果?要求:1、将下列程序 程序改错(vfp)下列程序的功能是求不超过1000的回文素数.所谓素数,就是仅能被1和它自身整除的整数;所谓回文素数,是指该素数从左向右和从右向左读其结果值相同.要求:(1) 将下列程 vfp改错题求解1下列程序用来产生20个0~100之间的随机整数,* 并找出其中的最大数和最小数,输出时20个随机* 整数*均在一行显示,下一行显示最大数和最小数.*要求:* (1)将下列程序输入到项目中 vfp 改错下列的程序的功能是:删除字符串(不包括汉字)中的空格* 并将它按字符从大到小的顺序排列后输出.例如:字符串* B C efA,输出结果为“feCBA”.要求:* (1)将下列程序输入到项目 vfp的2道程序题~谢谢各位高手改错功能:以下程序通过键盘输入4个数字,找出其中最小的数.*------------------------------------------------------- SET TALK OFF TT=TT+1第二处 CLEAR ?口令错,按任意 VFP 程序题如何做 具体例子 一道关于VFP的选择题,可否帮忙解释下为什么选D,执行下列程序,显示结果是().S=0N=1DO WHILE N