数素数 pascal数素数Time Limit:1000MS Memory Limit:65536KTotal Submit:654 Accepted:172Description输出[m,n]之间的所有素数的个数kInput只有一行共有二个正整数:m n ( 1 < m < n < 1000000 )Output只有一行且只有一个整数:
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/03 01:24:11
![数素数 pascal数素数Time Limit:1000MS Memory Limit:65536KTotal Submit:654 Accepted:172Description输出[m,n]之间的所有素数的个数kInput只有一行共有二个正整数:m n ( 1 < m < n < 1000000 )Output只有一行且只有一个整数:](/uploads/image/z/2679858-18-8.jpg?t=%E6%95%B0%E7%B4%A0%E6%95%B0+pascal%E6%95%B0%E7%B4%A0%E6%95%B0Time+Limit%3A1000MS+Memory+Limit%3A65536KTotal+Submit%3A654+Accepted%3A172Description%E8%BE%93%E5%87%BA%5Bm%2Cn%5D%E4%B9%8B%E9%97%B4%E7%9A%84%E6%89%80%E6%9C%89%E7%B4%A0%E6%95%B0%E7%9A%84%E4%B8%AA%E6%95%B0kInput%E5%8F%AA%E6%9C%89%E4%B8%80%E8%A1%8C%E5%85%B1%E6%9C%89%E4%BA%8C%E4%B8%AA%E6%AD%A3%E6%95%B4%E6%95%B0%3Am+n+%28+1+%3C+m+%3C+n+%3C+1000000+%29Output%E5%8F%AA%E6%9C%89%E4%B8%80%E8%A1%8C%E4%B8%94%E5%8F%AA%E6%9C%89%E4%B8%80%E4%B8%AA%E6%95%B4%E6%95%B0%3A)
数素数 pascal数素数Time Limit:1000MS Memory Limit:65536KTotal Submit:654 Accepted:172Description输出[m,n]之间的所有素数的个数kInput只有一行共有二个正整数:m n ( 1 < m < n < 1000000 )Output只有一行且只有一个整数:
数素数 pascal
数素数
Time Limit:1000MS Memory Limit:65536K
Total Submit:654 Accepted:172
Description
输出[m,n]之间的所有素数的个数k
Input
只有一行共有二个正整数:m n
( 1 < m < n < 1000000 )
Output
只有一行且只有一个整数:k
Sample Input
5 10
Sample Output
2
Source
基础题
数素数 pascal数素数Time Limit:1000MS Memory Limit:65536KTotal Submit:654 Accepted:172Description输出[m,n]之间的所有素数的个数kInput只有一行共有二个正整数:m n ( 1 < m < n < 1000000 )Output只有一行且只有一个整数:
var n,m,ans,i,j:longint; f:boolean;
begin
readln(m,n);
ans:=0;
for i:=m to n do
begin
f:=true;
for j:=2 to trunc(sqrt(i)) do
begin
if i mod j=0 then
begin
f:=false; break;
end;
end;
if f then inc(ans);
end;
writeln(ans);
end.