- 41.00 KB
- 2022-08-30 发布
- 1、本文档由用户上传,淘文库整理发布,可阅读全部内容。
- 2、本文档内容版权归属内容提供方,所产生的收益全部归内容提供方所有。如果您对本文有版权争议,请立即联系网站客服。
- 3、本文档由用户上传,本站不保证质量和数量令人满意,可能有诸多瑕疵,付费之前,请仔细阅读内容确认后进行付费下载。
- 网站客服QQ:403074932
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"请输入第三个数:"tozifx0Y=-|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题:把输入一个三位数,各个数位按个、十、百位顺序拆开别输出存入变量S中,用加号分隔。如输入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