实验十
1、找出100以内所有素数添加到列表框中。程序中至少定义一个用于判断素数的自定义函数。
2、找出所有水仙花数。程序中至少定义一个用于判断三位整数是否是水仙花数的自定义函数。
3、编写程序,生成n组22选5的彩票号码组(每组由各不相同的5个数组成,且每个数只能取1~22之间的数字)。
要求:至少包含一个通用过程。
工程文件保存为P2.VBP,窗体文件保存为:F2.VBP。
4、编写一个数据转换程序,将一组大小差异很大的数据变换为[0,1]区间的数值。设这样本数据的最大值为maxa,最小值为mina,将第k个样本值vk变换为vk’的变换公式为:
Vk'?Vk?mina(k?1,2,3,...,n)
maxa?mina生成样本数据:利用InputBox函数输入需要生成的数据个数n,缺省值为10,再生成n个1-999之间的随机整数,并在文本框中显示。
【要求】1、程序参考界面如下图所示,不得增加或减少界面对象或改变对象和种类; 2、程序中至少包含一个通用过程;
3、窗体文件与工程文件分别保存为F2.frm与P2.vbp。
实验十一
1、验证哥德巴赫猜想:任何一个大于等于4的偶数,都可以拆分为两个素数之和。 2、找出所有由四个不同数字组成的素数。
3、编写程序求出所有无重复的三个整数组合,使它们的最小公倍数等于指定数据N(设N取值范围为[100,150],三个整数的范围为[3,40])。 【要求】1)、程序参考界面如下图所示,不得增加或减少界面对象或改变对象和种类;
2)、程序中至少定义一个名为Lcm的函数过程用于求三个整数的最小公倍数; 3)、点击“清除”按钮可以清除文本框与列表框中的内容,且焦点设置在文本框上;
4、编程找出10000以内所有的回文数的平方仍是回文数的数。所谓回文数是指左右数字完全对称的自然数,例如:11,121,1221等都是回文数。 【编程要求】
1) 程序参考界面如图所示,编程时不得增加或减少界面对象或改变对象的种类,但界面元
素的大小、位置可随意设置。
2) 单击“生成数据”按钮,应将10000以内所有的回文数的平方仍是回文数的数,按图中
示意形式存放在列表框List1中。 3) 单击“返回”按钮,结束程序运行。 4) 程序中定义一个判断回文数的函数过程。
实验十二
1、【题目】
编写程序,生成一个由两位随机整数组成的5×5的数组,并显示在图片框中;再找出该数组的最小元素,并将最小元素所在列删除(将最小元素所在列之后的各列依次前移);将5×5的数组重定义为一个5×4的数组,显示在另一个图片框中。 【编程要求】
1) 程序参考界面如图所示,编程时不得增加或减少界面对象或改变对象的种类,窗体及界
面元素大小适中,且均可见。
2) 按“生成数组”按钮,则将生成的数组显示在图片框中;按“删除列”按钮,则将最小
元素所在的列删除后的新数组显示在图片框中。
3) 在程序中定义一个实现查找最小元素及删除列的通用子过程。
2、【题目】
A数组是由随机生成的且均为两位数的元素构成的6×6二维数组,在每一列中选出一个最小数,然后在所选的6个数中挑出最大的一个数,叫做“小数中的最大数”;在每一行中选出一个最大数,然后在所选的6个数中挑出最小的一个,叫做“大数中的最小数”。在文本框中分别显示这两个数。 【编程要求】
1) 程序参考界面如下图所示,编程时不得增加或减少界面对象的种类,窗体及界面元素大
小适中,且均可见。 2) 按“开始”按钮,则生成数组,并将数组元素按行显示在图片框中,调用子程序进行“选
数”处理(如图所示);按“清除”按钮,,则将图片框和两个文本框清空;按“结束”按钮,则结束程序运行。
3) 在程序中分别定义两个求矩阵每行中的最小数和最大数函数过程。
3、【题目】
找出所有三位数的幸运数对。所谓幸运数对是指差为3,且每个数的各位数字之和都能被6整除的一对数。例如189,192就是一对幸运数。 【编程要求】
1) 程序参考界面如右图所示,变成时不得增加或减少界面对象或改变对象的种类,窗体及
界面元素大小适中,且均可见。
2) 按“查找幸运数”按钮,则运行程序,生成并显示幸运数对;按“清除列表框”按钮,
则将列表框清空;按“结束”按钮,则结束程序运行。 3) 在程序中定义一个生成幸运数对的通用过程。
实验十三
1、编写模拟翻硬币的程序。设硬币画面为1,字面为0。10个硬币画面向上围成一圈,按顺时针方向数硬币,凡数到可被3或被7整除的数时,则将该硬币翻转。从1数到指定的次数,显示这些硬币的状态。 【编程要求】
1) 程序参考界面如图所示,编程时不得增加或减少界面对象或改变对象的种类,窗体及界
面元素大小适中,且均可见。
2) 按“翻转硬币”按钮,则将初值显示在“初始状态”文本框中,并按题目要求进行硬币
翻转处理,从1数到输入到“次数”文本框中的数字,再将结果显示在“当前状态”文本框中。
3) 按“清除”按钮,则将三个文本框清空,并将焦点设在“次数”文本框上;按“结束”
按钮,则结束程序运行。
4) 程序中至少要包含一个通用过程。
2、教材P.176,第17、18题。