作业帮pascal的题目 ——孪生素数
来源：学生作业帮 编辑：拍题作业网作业帮 分类：综合作业 时间：2024/04/25 08:16:36
pascal的题目 ——孪生素数
孪 生 素 数
如果a和a+2同为素数,那么a和a+2是一对孪生素数.请编程找出100以内的所有的孪生素数,并且统计有多少对孪生素数.
运行结果：
3 5
5 7
11 13
17 19
29 31
41 43
59 61
71 73
Total : 8
快·10分钟内在追5分
孪 生 素 数
如果a和a+2同为素数,那么a和a+2是一对孪生素数.请编程找出100以内的所有的孪生素数,并且统计有多少对孪生素数.
运行结果：
3 5
5 7
11 13
17 19
29 31
41 43
59 61
71 73
Total : 8
快·10分钟内在追5分
program sushu;
var j,s:integer;
function su(n:integer):boolean;
var i:integer; t:boolean;
begin
t:=true;
i:=2;
while t and (i
var j,s:integer;
function su(n:integer):boolean;
var i:integer; t:boolean;
begin
t:=true;
i:=2;
while t and (i