作业帮 > 综合 > 作业

0~100的素数的答案

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/25 01:11:34
0~100的素数的答案
比如2·3·5·7·11·13······
我就以我熟悉的pascal语言为例:
for i:=2 to 100 do
begin
f:=true;
for j:=2 to trunc(sqrt(i)) do
if i mod j =0 then begin f:=false;break;end;
if f then write(i,' ');
end;
输出结果为:
2 3 5 7 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97