program ex;
var i,j,m,n,f:integer; begin
readln(n,m);
f:=1;
for i:=n to m do
for j:=2 to round(sqrt(i)) do
if (i mod j)=0 then inc(f);
if (f=1) and (n>1) then writeln(i);
end.
举出n-m之间的素数哪错了？
var i,j,m,n,f:integer; begin
readln(n,m);
f:=1;
for i:=n to m do
for j:=2 to round(sqrt(i)) do
if (i mod j)=0 then inc(f);
if (f=1) and (n>1) then writeln(i);
end.
举出n-m之间的素数哪错了？
JC
