[农学]表单程序设计 35页

表操作练习表文件操作练习题 在D:盘建立文件夹MYVFP，用SETDEFATOD:\MYVFP命令将其设置为当前工作目录，先将XS复制到当前目录中，再打开表文件XS，完成以下操作：1、列表显示英语和计算机大于等于80分的记录，并将XS复制到当前文件夹中，取名为XS01；2、打开表文件XS01，在第6条记录之前插入一条空记录；3、逻辑删除第4—8条记录；4、增加一个总分（N，4）、平均分（N，5，1）和奖学金（N，4）字段。5、分别计算每个记录的总分和平均分；6、将总分大于等于310分的记录的奖学金评定为500元；7、显示总分大于等于320分的记录，要求只显示姓名、总分和奖学金字段；8、将计算机成绩大于等于80分的女同学的总分提高10%；9、去掉第3题所做的删除标记，并彻底删除表文件中的所有空记录；10、增加一个“出生年月”字段（D，8），输入每个记录的出生日期。11、增加一个“年龄”字段（N，3），根据字段“出生年月”计算每个学生的年龄（系统日期由函数DATE()产生）；12、按“总分”和“英语”字段的递减方式排顺序到XS03中；13、按“总分”及“出生年月”建立索引文件DF；14、将当前打开的表结构复制到XS04中，并将XS01中平均分小于65分的记录追加到XS04中。15、打开表文件XS04，顺序查找并显示1988年12月31以前出生的女同学。16、打开表文件XS01，按平均分降序索引，生成索引文件XS05，索引查找并显示平均分为73.5分的记录。17、对表文件XS01的记录，按性别分类，并对男同学和女同学的总分汇总，生成汇总文件XSHZ.DBF.18、分别在第1和第2工作区中打开表文件学生表和成绩表，并显示每个记录的姓名、年龄和成绩。 学生表文件：xs.rar参考答案：表操作练习答案.doc 结构化程序设计练习\n练习题一1、从键盘上输入一个自然数，判断其奇偶性。2、从键盘上输入一个数，求该数的算术平方根。3、从键盘上输入一个成绩，并根据下列要求评定成绩档次：>=90             优秀>=80且<90      良好>=70且<80      中等 >=60且<70     及格<60             不及格4、从键盘上输入一个数X，计算下列Y的值：5、统计1—500之间能被2和3整除的数的个数值。6、从键盘上输入两个数M、N，若M比N大，则输出，反之，则输出M*N。练习题二1、计算：    S=2+5+8+……+3*N-1（N=100，从键盘输入）。2、计算：   （n=10,从键盘输入）3、从1开始求奇数的累加和，若其和大于5000，则输出累加结果及累加的奇数个数。4、打开表文件学生表.dbf，查找从键盘上输入的姓名胡丽萍，若找到，先显示该记录，再将其作逻辑删除；若找不到，则显示“要删除的姓名不存在！”。编程实现以上功能。5、求（n=100，从键盘输入）。(S=1.6350)6、编程求一元二次方程的解（a、b、c从键盘输入）。7、从键盘上任意输入n个数，找出其中的最大数。8、编程实现从1到500之间抽取1、9、17、25、……这一系列数据（至少用2种方法）。9、求S=1！+3！+5！+……+11！。(S=40284847)10、编程构造一个66方阵，使主对角元素为1，其他元素为0。11、打印输出以下图形：（1）                                                   （2）                                                        12、某城市电话号码由7位升为8位，升位规则为：当电话号码的第一位为2、3、4、5的在号码前加2，其余在号码前加3。编程实现以上升级。13、从键盘上输入一个数N，以该数为起始数，求出20个能被6整除，并且末位数是8的数。\n14、从键盘上输入任一小数，将其化成整数后输出。15、从键盘上输入任一数，判断这个数有几位小数(末位为0不计)。16、计算S=1*2+2*3+3*4+……+n*(n+1) (n=100,从键盘输入)。17、计算（n=500,从键盘输入）。(S=1.3863) 18、将26个大写英文字母按A、B、C、……的顺序分二行输出。19、将1—25平均分5行输出，结果如下图。                              第18题                                          第19题程序设计上机练习题（3）1、 计算     (S=1.7183)2、 求1—1000以内的所有素数。3、 从键盘上输入一汉字字符串（如“数据库系统程序设计”），将其反向输出。4、 打印输出如下形式的乘法九九表。 1         12         2  43         3  6   94         4  8   12  165         5  10  15  20 256         6  12  18  24 30 367         7  14  21  28 35 42 498         8  16  24  32 40 48 56 649         9  18  27  36 45 54 63 72 81 5、 从键盘上输入一正整数数据串（如：4532670985623），将其反向输出。6、 从键盘上输入一正整数数据串（如：4532670985623），求：（1）所输入的数是个几位数。（2）求其中所包含的偶数的个数。（3）分别求其中的偶数和奇数之和。\n7、 从键盘上输入10个数（1，-2，7，0.2，3，-6.9，0.8，-9，12，6.1），去掉最大最小求平均。8、 利用公式 求∏的近似值，直到某一项的绝对值小于10^(-8)为止。(3.1416)9、 有一分数序列 求出这个数列的前50项之和。(81.2013)10、猴子吃桃问题。第一天摘下若干个桃子，当即吃了一半，还不过瘾，又多吃了一个，第二天早上又将剩下的桃子吃掉一半，又多吃了一个。以后每天早上都吃了前一天剩下的一半另一个。到第10天早上再想吃时，就只剩一个桃子了。求第一天共摘了多少桃子。(1534)11、求一个两位数各个数位之和等于这个数的算术平方根。(81)12、求水仙花数。即一个三位数各个数位的立方的和等于这个数。(153,370,371,407)程序设计上机练习(4) 1、求2-100之间的所有素数及素数之和。 2、编写一密码验证程序，当密码输入正确则显示“欢迎使用本系统！”，若密码不正确，可以显示“密码不正确，请重新输入！”，允许输入3次，若3次输入都不正确，则显示“你无权使用本系统！”，并结束程序。 3、打开表文件学生表，用SCAN-ENDSCAN语句分别统计男同学和女同学的人数。 4、用二重循环语句构造一6*6阶方阵，如下图所示：A 0 0 0 0 00 B 0 0 0 00 0 C 0 0 00 0 0 D 0 00 0 0 0 E 00 0 0 0 0  F 5、打开表文件成绩表，计算每个学生的总分，并用DO-ENDDO循环语句依次统计总分在270分及以上的人数，并输出统计结果。 6、任意输入2个正整数数，编程求这两个数的最大公约数和最小公倍数。 7、打印输出以下图形：\n         8、将一个正偶数分解成两个素数之和。程序设计上机练习（5）一、程序填空： 1、求1-100之间能被2和3整除的数之和。  CLEAR________________FOR I=1TO100       IF MOD(I,6)=________________          S=S+I       ENDIF________________?"S=",S  2、将输入的字符串倒置输出。 CLEARACCEPT“请输入字符串：” TO CL=LEN（C）P=SPACE（0）DO  WHILE ______________ CC=_________________________________ P=P+CC _______________________ENDDO?C+”->”+P  3、输出图形         AAAAABBBBCCC\nDDE  CLEAR  FOR I=1 TO _________       ?SPACE（20）      FOR J=1 TO ___________________                  ??_____________         ENDFOR ENDFOR  4、计算：S=1！+3！+5！+……+15！   CLEAR  ____________  FOR I=1 TO  15 ___________________________FOR J=1  TO ________ P=P*JENDFOR S=_____________________________ ENDFOR ?"S=",S  5、打开当前文件夹中的表文件学生成绩统计表，依次统计平均分大于等于90分和平均分不及格的人数，结果分别存放在变量N1和N2中。 CLEARUSE STUDENTN1=0N2=0DO WHILE ___________  IF 平均分_______________     N1=N1+1  ENDIF  IF 平均分<60     N2=N2+1  ENDIF  ________________ENDDO?"N1=",N1\n?"N2=",N2 二、编程 1、打开当前文件夹中的表文件学生成绩表，依次查找平均分最高和最低的记录，找到后显示该记录的姓名、性别、总分和平均分。 2、编写一删除表文件的程序。要求：表文件由键盘输入，若该文件存在，则将其删除；若不存在，则显示“输入的表文件不存在！”。 3、从键盘上输入两个数M和N，将M*N-1的值反向输出。 4、从键盘上输入一个数N，求N！中末尾所包含的“0”的个数。 5、从键盘上输入一个数值型数据（可以有小数点），找出该数据中数码最大的数和数码最小的数（如：2963.7154中，数码最大的数是9，数码最小的数是1）。程序设计上机操作练习题（6）1、求3*3矩阵的最大值并输出。   例如，当矩阵为：                  1 2 3                  4 9 5                  7 8 6则最大值为：9 2、从键盘上输入一正整数N（位数不限），计算N的各位上的数字之积。例如，若输入：252，则输出应该是：20。若输入：202，则输出应该是：0。（当N=5814时，结果为160）。 3、在第一个循环中给a数组的前10个数组元素依次赋1、2、3、4、5、6、7、8、9、10；在第二个循环中使a数组前10个元素中的值对称折叠，变成1、2、3、4、5、5、4、3、2、1；在最后一个循环中输出对称折叠以后的a数组的前10个元素。 4、输出200～300之间的所有素数，要求每行输出8个素数。 5、女儿今年12岁，父亲比女儿大30岁，计算出父亲在多少年后比女儿年龄大一倍，那时他们的年龄各是多少？ 6、找出1～100之间的全部同构数。所谓同构数是指这样一个数，它出现在它的平方数的右端。例如，5的平方是25，5出现在25的右端，5是一个同构数。25的平方是625，25出现在625的右端，25也是同构数。 7、输出1～1000之间的所有完数，并输出每个完数的所有因子。所谓完数，就是指一个正整数，它的各因数之和等于其自身。例如，28=1+2+4+7+14，28是一个完数。 8、计算（M+N）！/（M！+N！）子程序名为:P-1。(当输入M=8，N=6时,结果为：2124227.3684) 9、设计一个计算器程序。实现对输入的两个数作加、减、乘、除运算。即输入两个操作数和运算符根据运算符完成相应的运算。 \n10、中国古代数学史上著名的“百鸡问题”：鸡翁一，值钱五；鸡母一，值钱三，鸡雏三，值钱一。百钱买百鸡，问翁、母、雏各几何？ 11、输入一个整数，求它的各位数字之和及位数。例如，347的各位数字之和是14，位数是3。 12、验证哥德巴赫猜想：任何一个大于6的偶数都可以表示为两个素数之和。例如6=3+3，8=3+5，……，100=3+97。要求将6~100之间的偶数都表示成两个素数之和，每行输出5组。13、编程构造一个66方阵，使主对角元素为1，其他元素为0。 14、从键盘上输入正整数N，在N以上的正整数序列中，找出50个满足其各个数位数字之和等于5的整数。要求每行输出10个数。 15、将一个正数分解质因数。例如，输入90，输出90=2*3*3*5。 16、（中国古典算术问题）某工地需要搬运砖块，已知男人一人搬3块，女人一人搬2块，小孩两人搬1块。用45人正好搬45块，问有多少种搬法？ 17、破译密码：若输入的明码字符串中出现英文字母，均转换成顺序排列在该字母后的第5个字母（26个英文字母首尾相接顺序转换），非英文字母不转换。 （例如，当输入的明码为：A8-Y#W2X，则输出的密码为：F8-D#B2C 18、从键盘上输入一正整数M，从这个数开始，求20个末位是3的素数，并分2行输出。程序设计上机练习题(7)1、编写一计算阶乘的过程，过程名为JC，主程序通过调用该过程，计算： （M、N分别为12和8，由键盘输入）（495）2、编写一个将给定正整数N分解质因数的函数，函数名为FJ。主程序通过调用该函数，将输入的数N分解质因数（例如：12=2*2*3）。3、利用算式编写一个求正弦函数sin(x)值的自定义函数，函数名为sn。计算到    为止。主程序通过调用该函数计算：的值。（1.71183） \n表单程序设计练习表单程序设计练习题（1）1、设计一求输入数的算术平方根和它的倒数的表单（结果要求保留4位小数），如下图（1）运行表单时的初始状态：  （2）输入数据并单击“平方根”按钮后： （3）当输入负数时的运行界面：\n （4）再输入一个正数时的运行界面： （5）输入数据并单击“倒数”按钮后：    （6）输入0并计算倒数时的界面： \n   （7）再输入不等于0的数并计算倒数时的界面：  2、设计一判断输入的任一自然数是否为素数的表单，如下图 （1）运行表单时的初始状态：\n （2）输入数字并单击“确定”按钮后：    当输入一个素数时：   当输入的数不是素数时： 3、设计一将输入的汉字倒置输出的表单，如下图所示：  （1）运行表单时的初始状态：\n （2）输入汉字并单击“汉字倒置”按钮后： 4．任意输入一英文字符串，将其中的小写字母转换成大写。（1）运行表单时的初始状态：（2）输入汉字并单击“汉字倒置”按钮后：\n  表单操作题二1、设计一求输入数的算术平方根的表单（结果要求保留4位小数），如下图（1）输入数据100并单击“平方根”按钮后： （2）当输入负数-100时的运行界面：\n 2、设计一判断输入的任一自然数是否为素数的表单，如下图 （1）运行表单当输入89并单击“判断素数”按钮的界面： （2）当输入99并单击“判断素数”按钮的界面：     3、输入三角形三边的长，先判断是否构成一个三角形，若能构成，则计算三角形的面积；不能构成则显示“不能构成三角形！”。判断是否是三角形，可利用：A+B>CA+C>BB+C>A\n  \n4、编制一个信息显示（时钟）界面，显示当前时间（每秒动态跳动一次）；并将时间分别以红、蓝两种颜色自动变换（与时间同步切换，如下图所示）。  5、在文本框中输入任一自然数，单击“统计”按钮，统计从这个数开始的20个能被3整除且末位为3的数，将统计结果在编辑框中显示，并利用标签输出这20个数的和，如下图所示。\n 6、编制一个表单，实现以下功能：（1）将小写字母转化为大写，界面如下图所示；（2）利用文本框输入字母，利用标签显示转化成大写后的内容。7、1）.编制一个表单完成计时器计数显示功能；\n2）表单初始显示状态为全零“00：00：00”；3）按“计数”按钮，将自动以秒为单位从零开始计数（设：时的计数属性名为S，分的计数属性名为F，秒的计数属性名为M）并在表单上动态显示，按“停止”按钮将显示最后一刻的计数时间。\n       表单程序设计（3）1、编制如下界面的表单，当用微调调调整日期时，对应的中文和英文能随着变化。 2、在标签中输入文字，运行表单时，标签中的文字能放大和缩小，界面如下图所示。 3、在文本框中输入一个正整数，单击“显示”按钮，能在编辑框中显示以输入数字为行数的如下图所示的正三角形。\n4、编制一个能设置文本框中的汉字的字体、字型、字号和颜色的表单，界面如下所示。        （1）表单设计界面        （2）单击微调增大字号同时单击隶书和红色的效果         （3）单击斜体和蓝色后的效果\n5、编制一学生查询表单，表文件名为学生表，表单设计时，需要将学生表添加到数据环境中，运行表单时，能实现如下效果。 (1)首记录 (2)前翻或后翻\n (3)末记录6、编制一个个验证登录密码的表单。当输入密码正确，则“欢迎使用本系统！”。若密码不正确，则显示“输入的密码不正确，请重新输入！”，若三次输入的密码都不正确，则显示“你无权使用本系统！”。（1）表单设计界面\n（2）输入密码正确 （3）输入密码不正确 \n（4）三次输入密码都不正确 表单练习题四1、编制一个用列表框进行学生信息查询的表单，取名为myform1.scx，界面如下图所示。（表文件名为C1.DBF） （1）表单设计界面（2）表单运行时的界面\n（3）在列表框中单击一个姓名后的界面 2、编制一个用组合框进行学生信息查询的表单，取名为myform2.scx，界面如下图所示。（表文件名为C1.DBF） （1）表单设计界面\n（2）表单运行时的界面（3）在组合框中单击一个学号后的界面  3、设计一表单，实现两个列表框中的信息互换，如下图。要求用“学生表”中的“姓名”字段填充源数据列表。   (1)表单设计界面                 \n（2）右移一项的效果      （3）全部右移的效果  \n           （4）全部左移的效果 4、编制一个学生查询系统，通过单击选项按钮组中的按钮，能实现前后翻功能，取名为myform3.scx，界面如下图所示。（表文件名为学生表.DBF）（1）表单设计界面\n（2）单击“首”按钮时的界面（3）单击“末”按钮时的界面\n 5、编制一个用列表框求指定学生的平均成绩，取名为myform4.scx，。（表文件名为C1.DBF）  （1）表单设计界面 （2）在列表框中选择一个学生后的界面\n6、编制一个用组合框求指定班级的奖学金总额的表单，取名为myform5.scx，。（表文件名为C1.DBF）   （1）表单设计界面 （2）在组合框中选择一个班级后的界面  7、编制一个用组合框求指定班级的平均年龄的表单，取名为myform6.scx，。（表文件名为C1.DBF）            （1）表单设计界面 （2）在组合框中选择一个班级后的界面\n 8、编制一个学生信息查询表单，取名为myform7.scx，。当在文本框中输入学生学号，则在表单中显示该学生的信息，若该学生不存在，则在标签中显示“你所指定的学生不存在！”。（表文件名为C1.DBF）（1）表单设计界面               （2）表单运行时的界面（3）若输入的学生存在时的界面\n             （4）若输入的学生不存在时的界面 9、编制一个用组合框求选定姓名的平均成绩及排名顺序的表单，取名为myform8.scx，。（表文件名为C1.DBF） （1）表单设计界面（2）在组合框中选择一个姓名后的界面\n