原创力文档- 1、本文档共3页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
vfp读程序
读程序
有如下程序STORE O TO N，S DO WHILE.T.
N=N+1
S=S+N
IF N>=1O
EXIT
ENDIF
ENDDO
？”S=“+STR（S，2）设成绩库CJK.DBF中“数学”（数值型字段）这门课程的学分为4，其学分计算的方法如下：数学＞=90,学分值为4 80<=数学<90,学分值为3 70<=数学<80,学分值为2 60<=数学<70,学分值为1数学<60,学分值为0计算任一学生数学这门课程的学分值的程序如下USE CJK
XH=0
XF=0
SAY”请输入学号：” GET XH
LOCATE FOR学号=XH DO CASE
CASE______
XF=4
CASE______
XF=3
CASE__________
XF=2
CASE__________
XF=1
OTHERWISE
XF=0
ENDCASE
?"学号:",XH?"数学的学分值:",XF USE
RETURN
读程序填空
用两种循环步长值来求1+2+3+...50的值，请将程序填写完整。程序一：S=0
FOR__（1）___ S=S+N
ENDFOR
? S
RETURN
程序二: S=0
FOR__（2）___S=S+N
ENDFOR
?S
RETURN
有如下程序当变量I在奇偶之间变化时，求出下面程序的输出结果。CLEAR
I=O
DO WHILE I<10
IF INT(I/2)=I/2
?"W"
ENDIF
?"T"
I=I+1
ENDDO
给出以下程序的运行结果
X=0
Y=0
DO WHILE X<100
X=X+1
IF INT(X/2)=X/2
LOOP
ELSE
Y=Y+X
ENDIF
ENDDO
?"Y=",Y
RETURN
给出以下程序运行结果
CLEAR
M=0
N=100
DO WHILE N>M
M=M+N
N=N-10
ENDDO
? M
RETURN
编程题：
编写程序，求1到100中能被3整除的数的和。
编写程序，计算10!
3
文档评论（0）