UC知道垃圾菜鸟问basic问题！
来源：百度知道 编辑：UC知道 时间：2024/06/04 11:42:49
dim i,j,x
i=3
print"2"
while i<100
x=2
j=2
while j<i and x=2
if i mod j<>0 then x=1
else
end if
j=j+1
wend
if x=1 then print i
i=i+1
wend
end
算100以内的素数 那里错了啊？
i=3
print"2"
while i<100
x=2
j=2
while j<i and x=2
if i mod j<>0 then x=1
else
end if
j=j+1
wend
if x=1 then print i
i=i+1
wend
end
算100以内的素数 那里错了啊？
问题比较多！！
你应该是要求100以内素数的和吧
Dim sum%, i%, j%
For i = 2 To 100
For j = 2 To i - 1
If i Mod j = 0 Then
sum = sum + i
End If
Next j
Next i
Print "一百以内素数的和是：", sum