您所在位置：主题：谁能帮我解释下这个程序
qiulu111
[专家分：0] 发布于 2010-04-13 19:03:00
求3-100的所以素数：
real i,j,k
do i=3,100
j=sqrt(real(i))
k=2
10 do while(k.le.j.and.mod(i,k).ne.0)
k=k+1
enddo
20 if(k.gt.j)then
print*,i,'is primr number'
endif
enddo
疑问1：20行 if(k.gt.j)then？搞不懂
疑问2：怎么10行和20行有关联吗？20行不是已经跳出10行的DO WHILE循环了吗？
real i,j,k
do i=3,100
j=sqrt(real(i))
k=2
10 do while(k.le.j.and.mod(i,k).ne.0)
k=k+1
enddo
20 if(k.gt.j)then
print*,i,'is primr number'
endif
enddo
疑问1：20行 if(k.gt.j)then？搞不懂
疑问2：怎么10行和20行有关联吗？20行不是已经跳出10行的DO WHILE循环了吗？