vb作业第八周.docVIP

第八周，第六次上机作业 1 第六、七周，第五次上机作业 1 第五周，第三次上机作业 2 第四周，第二次上机作业 3 第三周，第一次上机作业 4 解答 6 第八周，第六次上机作业 歌手评分。输入10个评委的打分，去掉最高分和最低分之后，输出该选手的成绩。 2、任意生成一个有序数组，任意插入一个数之后，保持数组仍然有序，打印输出。 3、生成有十个元素的数组，每个元素随机生成。使用选择法对数组进行排序。 4、完成气泡法排序。 第六、七周，第五次上机作业 2013-04-08—04-21 完成教材上相应章节中的例题；完成实验讲义中的所有练习！ 五种形式将九九乘法表打印输出。 打印所有水仙花数。 对于数字构成的字符串，考虑使用数学运算的方式设计程序。挑战：输入任一字符串，把它倒序输出。 多种方法求质数。求200-300以内的所有质数 使用数组生成斐波那契数列前40项，每行输出五个数字。 使用数组生成20个100以内的随机整数。输出其中最大的数和数组元素所在的下标。 求国际象棋棋盘上放置麦粒的数量，并求出覆盖地球表面后的厚度，假设1亿粒小麦的体积为1立方米，地球的半径为6500公里。 for循环，打印斐波那契数列，挑战：分别实现每行上输出三、四、五个数字 求解表达式的值： 求e，当第i项10-6时结束。 求两自然数m，n的最大公约数和最小公倍数。 愤怒的小鸟游戏！（使用PictureBox图形框，在picture属性中选择图片a1） 第五周，第三次上机作业 2013-04-01—04-07 在窗体中打印九九乘法表。 鸡兔同笼问题。 使用inputbox()函数，分别输入鸡和兔子的头和脚的数量，计算并输入对应的鸡的数量和兔子的数量，要求实现程序检测，检测输入的数据是否合理。 挑战：不允许出现负的结果和不为整数的结果。 实现一元二次方程求解。要求能够处理判别式小于零和方程系数输入错误的情况。 求数列，1、1+2、1+2+3、1+2+3+4、1+2+3+4+5、……前n项之和，n由文本框输入的数值决定。 输入一个数，判断是否为质数。 求200-300以内的所有质数 第四周，第二次上机作业 2013-03-27 1、文本框练习 （1）启动后的窗体如图所示 （2）在左侧文本框中输入的文字，同时显示在右侧文本框中 （3）清除按钮的作用是清除两个文本框中的内容 （4）字体设置为三号字 （5）保存工程和窗体 2、鸡兔同笼问题。 分别输入鸡和兔子的头和脚的数量，计算并输入对应的鸡的数量和兔子的数量。 增加第二个按钮，提供还原的功能。 屏幕样式自行设计。输出方式自行设计。 挑战：检测输入的数据是否合理。 任意输入三个数，按从大到小的顺序输出结果。提示：可以通过文本框输入。 Timer使用练习二 在Timer使用练习一的基础上，增加文本框。在文本框中输入数字，则文字的移动速度相应变化。 第三周，第一次上机作业 2012-03-20、21 所有教材和实验讲义上的例题和实验内容 在窗体或者一个命令按钮上单击，“欢迎”和“你好”交替显示 应用的语句 If …… then …… Else …… Endif 设置两个命令按钮，点击其中一个之后，“欢迎”向右移动一定距离。点击另外一个之后，“欢迎”回到原来的位置。自己规定按钮的名字和按钮上显示的文字。 提示：应用到left属性 实现文本框中字体的缩放。点击放大按钮之后，字体放大3倍，放大按钮变得不可用。点击缩小钮扣之后，字体缩小3倍，缩小按钮变得不可用。点击还原之后，字体恢复原来大小，放大和缩小按钮变回可用状态。 设计程序打印以下图形 挑战：打印以下图形  Timer使用练习一 设置有阴影效果的文字，启动后自动向右移动，单击命令按钮后，停止移动。 生成可执行程序。拷贝到自己的可移动磁盘上。 解答 第八周 2、在有序数组中插入元素，保证数组依然有序 Dim a(10) As Integer, i%, k%, m% Print ====================== Print the original number For i = 1 To 8 生成有序的数组，并显示 a(i) = i * 4 Print a(; i; )=; a(i) Next i m = Val(InputBox(please input the number inserted)) For i = 1 To 8 找到应该插入的位置 If m a(i) Then Exit For Next i For k = 8 To i Step -1