编程VFP:1 121 12321-搜答案-灵鹊做题网

clear&&清屏t=o&&给t赋初值s=1&&赋初值给sfori=1to10&&循环s=s*i&&s=i!t=s+t&&t为1到i的阶乘和endfor&&循环终点"T=1!+2!+3!+…+10!=

新建-程序文件.最后保存的后缀应该是prg.

dimeaaa(10)&&创建数组aaa,一维数组,*用循环给数组赋1到100的随机数forn=1to10step1&&开始循环a(n)=1+100*rand()&&赋值1到100之间的随机数endf

input"n="tonfora=10^(n-1)to10^ns=0b=adowhileb0s=s+(b%10)^nb=int(b/10)enddoifs=a?int(a)endifendfo

s=0fori=100to999ifmod(i,6)=0bai=int(i/100)shi=int(mod(i,100)/10)ge=mod(i,10)ifbai=8andshi8andge8s=s+

步长,就是每次I增加的数量,这里step后面是2,则每次变量I就增加2,就是1、3、5、7...99再问：像此类题目中第一步都有：SUM=0是什么意思，再答：sum是一个变量，用来存放累加的和，sum

x=Val(Inputbox("请输入一个数：","测试"))Ifx>0Y=x*xEndifIfx=0Y=100EndifIfx

dowhile是条件循环,当满足循环条件时则进入循环体,一般在不知道具体循环次数时使用,在循环内部一般有计数的增加,如dowhilex

i=0s=0DOWHILEi

clears=0i=1dowhilei

dimeaaa(10)&&创建数组aaa,一维数组,*用循环给数组赋1到100的随机数forn=1to10step1&&开始循环a(n)=1+100*rand()&&赋值1到100之间的随机数endf

STEP是循环中的一个规则,比如：fori=1to100step2sum=sum+inext这个就是取100以内的奇数相加.MOD是取余数的一个函数：5MOD2结果是1.

1、clears=1fori=1to9s=s+i/(i+1)endfor2、clears=0fori=10to100ifmod(i,2)=0s=s+iendifendfo

1、clearinput"请输入成绩："tocjdocasecasecj>=0andcj=60andcj=80andcj=90andcj

clears=0fori=0to100step2s=s+iendfor?"0-100之间的偶数和:",s

clears=0fori=2to100step2s=s+1/iendfor"s=",sreturn

input"请输入一个数："toainput"请输入一个数："tobinput"请输入一个数："tocmax=aifmax

clearinput"a="toainput"b="tobinput"c="tocifa

(1)fora=1to10fori=ato1`step-1y=y+anextiy=y+a+1nexta

****!输出菱形CLEARFORi=1TO4FORj=iTO3?""ENDFORFORj=1TO2*i-1?"*"ENDFORFORj=iTO3?""ENDFOR?ENDFORFORi=3TO1ST