哥德巴赫猜想 多少组解 pascal
问题描述：
哥德巴赫猜想 多少组解 pascal
【题目描述】
任一个充分大的偶数N(4
答
for i:=2 to trunc(sqrt(m)) do
begin
if m mod i=0 then begin
p:=false;
break;
end;
end;
加一对begin和end