當前位置:編程學習大全網 - 編程軟體 - QBasic哥德巴赫猜想編程解釋

QBasic哥德巴赫猜想編程解釋

CLS 清屏

DO 開始循環

INPUT " A=", a 輸入"A="多少

CLS 清屏

LOOP UNTIL a > 6 AND a MOD 2 = 0 循環破出條件,A必須大於6 並且 A要是偶數

FOR I = 2 TO a / 2 開始循環,循環次數是 a/2-2次

F = 0 使F=0

FOR J = 2 TO I / 2 開始內層循環,循環次數是 I/2 -2次

IF I MOD J = 0 THEN F = 1: EXIT FOR 如果 I 除以 J的余數是0,然後就讓F=1:然後跳出循環

NEXT J 下壹次循環(針對J循環)

IF F = 0 THEN 如果F=0條件成立 然後

B = a - I B=a-I

F = 0 F=0

FOR J = 2 TO B / 2 開始J循環 循環次數 B/2-2次

IF B MOD J = 0 THEN F = 1: EXIT FOR 如果B除以J的余數是0 然後F=1 :跳出循環

NEXT J 下壹次循環

IF F = 0 THEN PRINT a; "="; I; "+"; B: END 如果F=0 就在屏幕上輸出 a值 = I+B的值,結束

END IF IF的配套結束語句

NEXT I 下壹次循環(針對I循環)

PRINT "NO" 輸出"NO"

END 結束

  • 上一篇:張繼軍的安陽工學院電子信息與電氣工程學院院長
  • 下一篇:東芝多功能e-studio300d如何連接電腦?
  • copyright 2024編程學習大全網