3个回答
展开全部
for i=3 to 10000 ‘查找质数
for j=2 to i-1
x=i mod j
if i<>0 then
exit for '如果除了1和本身,还能被任意小于本身的一个数整除,那么此数不是指数,并跳出循环,进行下一个数的判断
esle ‘如果一个数不能被所有小于它的数整除,那么这个数就是质数
pds=1 ‘质数累加的判断数,等于1时,质数个数累加1
end if
next j
if pds=1 then
y=y+1 ‘质数个数累加1
end if
next i ‘指数查找结束
for i 1 to 10000 ‘打印
print i, '打印数
if i<>10000 then
print space(5) '打印5个空格
else
print
print y 在最末尾打印质数的个数
end if
if i mod =20 then print 一行打印20个数
next i
for j=2 to i-1
x=i mod j
if i<>0 then
exit for '如果除了1和本身,还能被任意小于本身的一个数整除,那么此数不是指数,并跳出循环,进行下一个数的判断
esle ‘如果一个数不能被所有小于它的数整除,那么这个数就是质数
pds=1 ‘质数累加的判断数,等于1时,质数个数累加1
end if
next j
if pds=1 then
y=y+1 ‘质数个数累加1
end if
next i ‘指数查找结束
for i 1 to 10000 ‘打印
print i, '打印数
if i<>10000 then
print space(5) '打印5个空格
else
print y 在最末尾打印质数的个数
end if
if i mod =20 then print 一行打印20个数
next i
展开全部
FOR 循环变量=初始值 TO 终止值 STEP 步长
语句内容
NEXT 循环变量
for a=1 to 10 step 2
msgbox "现在A="&a
next a
语句内容
NEXT 循环变量
for a=1 to 10 step 2
msgbox "现在A="&a
next a
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
for i=0 to 11
msgbox "i=" & i
next
for i=11 to 0 step -1
msgbox "i=" & i
next i
msgbox "i=" & i
next
for i=11 to 0 step -1
msgbox "i=" & i
next i
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询