Question

用VB程序做以下题目求一个数,它除以三余二,除以五余三,除以七余二,求满足上面要求的最小数

Answer 1

Private Sub Form_Load()

i = 7

Do

If i Mod 3 = 2 And i Mod 5 = 3 And i Mod 7 = 2 Then Exit Do

i = i + 1

Loop

MsgBox i

End Sub

答案是23