Question

编写程序在浏览器输出1~999中能被3整除，且至少有一位数字是5的所有整数

谢谢咯。。。

Answer 1

ASP程序：

<%

Dim istr

For i=1 To 999

    If i Mod 3 = 0 Then

        istr = CStr(i)

        For j=1 To Len(istr)

            If Mid(istr,j,1)="5" Then

                response.write istr & "<br>"

                Exit For

            End If

        Next

    End If

Next

%>

易语言程序：——这个不是web程序，你可以对照参考以便理解。