实验6：结构化程序设计

《实验6：结构化程序设计》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、实验报告实验名称结构化程序设计课程名数据库原理及其应用专业班级：学生姓名：学号：成绩：指导教师：实验日期：实验六结构化程序设计一、实验目的1.掌握VisualFoxPro程序设计的语吕特点、基木输入输出命令的使用。2・熟悉程序文件的建立和运行。3・掌握顺序结构、选择结构、循环结构程序的设计方法二、实验准备1.VisualFoxPro建立、修改、删除执行程序文件的命令。2.基本输入、输入语句(inputaccepuwait???),格式输出命令(@v行，列〉sayget)以及环境设置命令(clearset)等三、实

2、验内容1.通过字符串操作竖向显示“伟大祖国”，横向显示“祖国伟大”SETTALKOFFSTORE“伟人祖国”TOVARCLEARN=1DOWHILEN<8?SUBSTR(①)N=N+2ENDDO?(②)??SUBSTR(VAR,1,4)RETURN请问：完善上述程序，实现其功能，并上机测试SETTALKOFFSTOKE"伟大祖国"tovarclearN=1DOWHILEN<8?SUBSTR(VAR,N,2)N=N+2ENDDO?RIGHT(VAR,4)??SUBSTR(VAR,1,4)RETURN伟大祖国祖2.判断某一年份

3、是闰年的方法是：年份能被4整除但不能被1()()整除，或者能被400整除。请分析满足闰年的条件，写出一个判断任意一年份(从键盘输入)是否为闰年的程序，并用1800,1958,2000,2004进行测试。SETTALKOFFCLEARINPUT“输入一个年份：“toxifx%4==0andx%100!=0orx%400==0@5,10say"您输入的是闰年"输入一个年份：1800对不起，你输入的不是闰年else@5,10强y"对不起》你输入的不是闰年"endifsettalkon输入一个年份：1958对不起，你输入的不是闰年

4、输入一个年份:2000输入—个年份:2004您输入的是闰年您输入的是闰年1.输入某个学生的成绩，按其成绩归类到优、良、中、通过、不通过5个等级之一，当输入成绩大于100或小于0时，提示“成绩错误，请重新输入”成绩分类法：优：90-100良：80—89中：70〜79通过：60-69程序3・prg不通过：0~59talkoffclearinput"诸输入成绩"toxifx<0orx>100?円成绩输入错误，诸重新输入"elsedocasecasex<=59?出不邇过"casex<=69?"通过“casex<=79?冲〃case

5、x<=89?"良"casex<=100诘输入成绩56不通过?忧endcase

6、endifsettalkonreturn1.利用实验一中得到的student.dbf杳找少数民族学生，并将其数学成绩增加指定的数值（从键盘输入）诘输入要増加的数学成绩值：10程序5.prg记录号3记录号3数学成绩数学成绩记录号5数学成绩133记录号5记录号10孙力军记录号10孙力军记录号13周晓记录号13周晓数学成绩143数学成绩105数学成绩115数学成绩数学成绩90settalkoffclearusestuderitinput“诘输入要増加的

7、数学成绩值：气。ascanfor民族!="汉"display姓名’数学成绩’民族replace数学成绩with数学成绩+包display姓名，数学成绩，民族endscansettalkonreturn5•分别统计200以内的所冇奇数与偶数Z和并输出200以内偶数之和为：10100如0以内奇数之和为：10000程序4.prgsettalkoffclearstore0tox?yforn=0to200step1ifint(n/2)=n/2x=x+nelsey=y+nendifendfor@3,4say"200以內偶数之和为："?

8、?x?芒00以内奇数之和为:：ysettalkon"turn