计算机编程习题
1题：编程求P=1x(1x2)x(1x2x3)x…x(1x2x…xN)，N由键盘输入。将结果输出并存入变量OUT中。INPUT"请任意输入一个数字:"TONp=1Fori=1tonS=1Forj=1toiS=s*jEndforp=p*sEndforOut=p?out2题：从键盘任意输入的三个数按从大到小排序。排序后存入变量A，B，C中input"请输入第一个数："toxinput"请输入第二个数："toyinput"请输入第三个数："tozifx
0Y=-|0X=0|-1X<0DocaseCasex>0Y=1Casex=0Y=0Casex<0Y=-1endcase?y8题：从键盘输入一个整数，输出所有能整除该数，并且本身也能被3整除的数的和。（例如：输入6，则输出3，6）结果存于变量x中。Input“请输入n的值：”tonFori=1tonIfmod(n,i)=0andmod(I,3)=0X=x+iEndifEndfor?x\n9题：利用循环程序输出图形：4333222221111111并将最后一行存入变量S中ForI=1to4Forj=1to4-i??”“EndforForn=1to2*i-1??str(5-I,1)Endfor?EndforS=”1111111”10题：利用循环程序输出图形：**************************并将第3行输出并存入变量S中Fori=1to5Ifi=1ori=5??”*******”ElseForj=1to5-i??”*”EndforForm=1to2*i-3??”“EndforForn=1to5-i??”*”EndforEndif?Endfor?”****”S=”****”\n11题：把输入一个三位数，各个数位按个、十、百位顺序拆开别输出存入变量Ｓ中，用加号分隔。如输入345分开后为3+4+5Input“请输入一个三位数”toni=int(n/100)j=int((n-i*100)/10)m=n-i*100-j*10s=str(i,1)+”+”+str(j,1)+”+”+str(m,1)?s12.题：用子程序求出1~15之间的能被3整除的整数的平方和。将结果输出并存入变量OUT中。S=0Fori=1to15Ifmod(I,3)=0S=s+i*iEndifEndfor13.题：在STUDENT.DBF数据表中按照计算机和英语对奖学金做相应的修改：两科之和为120分以上（包括120）的每人30元；两科之和为100分以上（包括100）的每人20元；其他人10元。表结构如下：学号(C,4)，姓名(C,6)，出生日期(D,8)，英语(N,3)，计算机(N,3)，系别(C,10)，奖学金(N,3)（用循环语句完成）Dowhile.not.eof()DocaseCase计算机+英语>=120Replace奖学金with30Case计算机+英语<120and计算机+英语>=100Replace奖学金with20OtherwiseReplace奖学金with10EndcaseSkipEnddoUse\n1、cleara="计算机等级考试"fori=1to7?substr(a,2*i-1,2)endfory="级"2、clearaccept"请输入一串汉字："toafori=1tolen(a)/2??right(substr(a,1,((len(a)/2+1)-i)*2),2)Endfor3、clearfori=2to20ifi=2?str(i,1)elseforj=2toi-1ifmod(i,j)=0exitendifendforifj=i?iendifendifendfor4、s=0fori=300to600ifmod(i,3)=0?is=s+1endifendfor?s
