验证哥德巴赫猜想：每一个大于2的偶数都可以表示成两个质数之和.输入大偶数N,输出4到N的所有偶数的一个表示式子.输入：10输出：4=2+2 6=3+3 8=3+5 10=3+7用pascal做
来源：学生作业帮助网 编辑：六六作业网 时间：2024/11/25 17:39:18
验证哥德巴赫猜想：每一个大于2的偶数都可以表示成两个质数之和.输入大偶数N,输出4到N的所有偶数的一个表示式子.输入：10输出：4=2+2 6=3+3 8=3+5 10=3+7用pascal做
验证哥德巴赫猜想：每一个大于2的偶数都可以表示成两个质数之和.输入大偶数N,输出4到N的所有偶数的一个表示式子.
输入：10
输出：4=2+2 6=3+3 8=3+5
10=3+7
用pascal做
验证哥德巴赫猜想：每一个大于2的偶数都可以表示成两个质数之和.输入大偶数N,输出4到N的所有偶数的一个表示式子.输入：10输出：4=2+2 6=3+3 8=3+5 10=3+7用pascal做
var
a:array[1..1000000000]of boolean;
i,n,j:longint;
begin
readln(n);
i:=0;
for i:=2 to n do
a[i]:=true;
for i:=2 to trunc(sqrt(n))+1 do
for j:=i to (n div i)+1 do
a[i*j]:=false;
i:=2;
while n>i do
begin
i:=2+i;
for j:=2 to n do
if a[j] and a[i-j] then begin writeln(i,'=',j,'+',i-j); break; end;
end;
end.
不懂qq：1532958223
可以用两重循环
再加个判断质数的过程
用if判断加法就行了。
因为所有大于2的偶数的个位数一定是0、2、4、6、8，而它对应的质数的个位数是1、3、7，所以，设这个偶数的尾数为X，设两个质数的和为Y。那么：当X=0时，Y=3+7；当X=2时，Y=1+1；当X=4时，Y=3+1；当X=6是，Y=3+3；当X=8时，Y=1+7
这样的话，不论这个偶数是什么有多大，都有对应质数相加的和。...
全部展开
因为所有大于2的偶数的个位数一定是0、2、4、6、8，而它对应的质数的个位数是1、3、7，所以，设这个偶数的尾数为X，设两个质数的和为Y。那么：当X=0时，Y=3+7；当X=2时，Y=1+1；当X=4时，Y=3+1；当X=6是，Y=3+3；当X=8时，Y=1+7
这样的话，不论这个偶数是什么有多大，都有对应质数相加的和。
收起