13问答网 > 分别使用while 循环、for循环写显示500以内所有包含7以及能被7整除的数字的程序

分别使用while 循环、for循环写显示500以内所有包含7以及能被7整除的数字的程序

2025-04-28 17:36:14

推荐回答（2个）

回答1：

'自己拆分
Dim i
i = 1
Print "while"
While i <= 500
If InStr(CStr(i), "7") > 0 And i Mod 7 = 0 Then Print i
i = i + 1
Wend
Print "for"
For i = 1 To 500
If InStr(CStr(i), "7") > 0 And i Mod 7 = 0 Then Print i
Next

回答2：

什么语言?JS?ASP?PHP?