题目

在我国古代《孙子算经》中曾经提出这样一个问题。原文是这样的：“今有物，不知其数，三三数之，剩二；五五数之，剩三；七七数之，剩二；问物几何？”。现分析如下，所寻找之数为满足如下条件的自然数：以3除余2，以5除余3，以7除余2，程序将从自然数1开始依次寻找，逐一判断某一自然数是否满足全部条件，直至在指定范围内找到满足条件的所有自然数。程序界面如右图，文本框名为Text1，用于录入最大自然数；列表框名为List1,用于输出结果。 程序代码如下：Private Sub Command1_Click()  Dim sum As Integer    'sum用来统计符合条件的自然数个数  Dim n, max As Integer  List1.Clear  sum = 0  max = _______①______    '指定查找范围的最大自然数，在text1框中输入  n = 0  Do While n <= maxn = n + 1       If _______   _②         ___  ThenList1.AddItem Str(n) '    ________③_______    End If  Loop  List1.AddItem ("共计" + Str(sum) + "个")    End Sub （1） 解决该问题所用到的是（填解析算法/枚举算法）。 （2） 程序中①划线处应填入。 （3） 程序中②划线处应填入。 （4） 程序中③划线处应填入。 答案： 【1】枚举算法 【1】Val(Text1.text) 【1】n Mod 3=2 And n Mod 5=3 Andn Mod 7=2 【1】sum=sum+1

查看本题答案和解析