哥德巴赫猜想 Pascal语言哥德巴赫猜想时间限制:1000 ms 内存限制:65536 KB提交数:164 通过数:42 【题目描述】任一个充分大的偶数N(4
来源:学生作业帮助网 编辑:作业帮 时间:2024/07/10 23:05:10
![哥德巴赫猜想 Pascal语言哥德巴赫猜想时间限制:1000 ms 内存限制:65536 KB提交数:164 通过数:42 【题目描述】任一个充分大的偶数N(4](/uploads/image/z/13934784-48-4.jpg?t=%E5%93%A5%E5%BE%B7%E5%B7%B4%E8%B5%AB%E7%8C%9C%E6%83%B3+Pascal%E8%AF%AD%E8%A8%80%E5%93%A5%E5%BE%B7%E5%B7%B4%E8%B5%AB%E7%8C%9C%E6%83%B3%E6%97%B6%E9%97%B4%E9%99%90%E5%88%B6%3A1000+ms+%E5%86%85%E5%AD%98%E9%99%90%E5%88%B6%3A65536+KB%E6%8F%90%E4%BA%A4%E6%95%B0%3A164+%E9%80%9A%E8%BF%87%E6%95%B0%3A42+%E3%80%90%E9%A2%98%E7%9B%AE%E6%8F%8F%E8%BF%B0%E3%80%91%E4%BB%BB%E4%B8%80%E4%B8%AA%E5%85%85%E5%88%86%E5%A4%A7%E7%9A%84%E5%81%B6%E6%95%B0N%284)
xՒN@_8E`Q.&Wʀ#eE5
0cVѠ$"MadJyRFz|gT)#/kO:`~bźoYllt.R$CQQֱ'&,-ziH"CzuXލxpvgj[8迼ӍT^U4;bk,c)Y
Ǖ=Lg]BL_=xIyA,ݾUuT@
*"&9+Wf:Vӱ! ɜ+o0grdbLQ9`|
EFR:$eB,tL&淋ɬ,yB=~A{' `{DTN|KE9rӄV,N:
哥德巴赫猜想 Pascal语言哥德巴赫猜想时间限制:1000 ms 内存限制:65536 KB提交数:164 通过数:42 【题目描述】任一个充分大的偶数N(4
哥德巴赫猜想 Pascal语言
哥德巴赫猜想
时间限制:1000 ms 内存限制:65536 KB
提交数:164 通过数:42
【题目描述】
任一个充分大的偶数N(4
哥德巴赫猜想 Pascal语言哥德巴赫猜想时间限制:1000 ms 内存限制:65536 KB提交数:164 通过数:42 【题目描述】任一个充分大的偶数N(4
program long;
var
i,j,k,l,m,n:longint;
function sushu(i:longint):boolean;
var
a,b:longint;
begin
for a:=2 to i-1 do
if i mod a=0 then begin sushu:=false;break;end else sushu:=true;
end;
begin
readln(n);
for i:=2 to n-2 do
if (sushu(i)=true) and (sushu(n-i)=true) then begin writeln(n,'=',i,'+',n-i);break;end;
end.