文档库

最新最全的文档下载
以后地位:文档库 > 算法实例综合复习卷

算法实例综合复习卷

算法实例综合复习卷

罗列算法实例:

罗列法:罗列出成绩的一切能够解,并在逐一罗列的过程当中,考验每个能够解能否

算法实例综合复习卷

在很多时辰,完成罗列算法的构造是轮回构造嵌套分支构造。

算法实例综合复习卷

37整除的数,累加并输入成果。

算法实例综合复习卷

算法实例综合复习卷

2、在1~1000这些天然数中算出一切被3和5除都余2

Private Sub Form_Load()

Dim x,n As Integer

Show

Print “1~1000之间被3和5除都余2的数:"

n = 0

For x = 1 To 1000

If x Mod 5 = 2 And x Mod 3 = 2 Then

n = n + 1

End If

Next i

Print "共有" & Str(n) & "个。"

End Sub