哥德巴赫猜想到底是大于2，还是大于6的偶数等于两个素数

快快

1742年，德国数学家哥德巴赫提出：每一个不小于6的偶数都是两个奇素数之和；每一个不小于9的奇数都是三个奇素数之和。

private sub form_click() dim a as integer dim b1 as integer, b2 as integer do while a < 6 or a mod 2 <> 0 a = inputbox("请输入一个偶数(>6)：") loop b1 = a / 2 b2 = b1 print gdbhcx(b1, b2) end sub function gdbhcx(c1 as integer, c2 as integer) dim i as integer dim b as boolean for i = 2 to sqr(c1) if c1 mod i = 0 then c1 = c1 + 1 c2 = c2 - 1 gdbhcx c1, c2 end if next i for i = 2 to sqr(c2) if c2 mod i = 0 then c1 = c1 + 1 c2 = c2 - 1 gdbhcx c1, c2 end if next i gdbhcx = c1 & "+" & c2 & "=" & c1 + c2 end function