试题

试题 试卷

logo

题型:综合题 题类:模拟题 难易度:普通

浙江省杭州市2016年信息技术高考模拟卷十

【加试题】在我国古代《孙子算经》中曾经提出这样一个问题,原文是这样的:“今有物,不知其数,三三数之,剩二;五五数之,剩三;七七数之,剩二;问物几何?”试用枚举算法来解决这一个问题。现分析如下,所寻找之数为满足如下条件的自然数:以3除余2,以5除余3,以7除余2。程序将从自然数1开始依次寻找,逐一判断某一自然数是否满足全部条件,直至在指定范围内找到满足条件的所有自然数。程序代码如下,请补充完整。

Private Sub Command1Click()
Dim p As Integer    ‘sum 用来统计符合条件的自然数个数
Dim n As Integer
Dim max As Integer   ‘指定查找范围的最大自然数
List1.Clear
p = 0
max = Val(Text1.Text)    ‘Text1文本框中输入
n = 0
Do While n <= max
  n = n + 1            ‘从自然数1开始不断往上寻找
  If       ①      Then
  List1.AddItem Str(n)    ‘找到后在List1中显示结果
  p=p+1
  End If
Loop
List1.AddItem ("共计" + Str(n) + "个")       ‘②
End Sub
(1)、程序中①处划线应填入
(2)、程序②处一句话中有错误,应该为
举一反三
返回首页

试题篮