求1000以内素数的和
人气:337 ℃ 时间:2020-02-03 04:44:17
解答
答案:76127;
P程序如下:
var i,j,k,n,z:longint;
begin
for i:=2 to 1000 do
begin
k:=1;
for j:=2 to round(sqrt(i)) do
if i mod j=0 then begin k:=0; break;end;
if k=1 thenz:=z+i;
end;
write(z);
end.
推荐
猜你喜欢
- 造句三个
- 两块正方形纸板,一块纸板面积喂243平方米,另一块纸板的面积为75平方米
- mend,he,clock,now,a.[用现在进行时连成句子]
- 求英文翻译 一方面,他相信自己能把任务完成,另一方面,他不知道能不能做的很好.
- 等比数列{an}的前n项和是Sn,若S30=13S10,S10+S30=140,则S20的值是_.
- 一桶油,若倒出油的1/4,连桶重19千克,若倒出油的1/3,重17千克,这桶油重多少千克?
- 函数f(x)在[0,+∞)上是单调递减函数,则f(1-x2)的单调增区间是_.
- Shanghai will build a Disnetland in the Pudong New Area,