Question

完全數（Perfect number）是一些特殊的自然數：它所有的真因子（即除了本身以外的約數）的和，恰好等于它本身． 例如：第一個完全數是6，它有約數1、2、3、6，除去它本身6外，其余3個數相加，1+2+3=6．又如：8的真因子是1，2，4，而1+2+4=7，所以8不是完全數．按定義設計一個QBASIC程序，判斷自然數n是否為完全數．（要求畫出程序框圖）

Answer 1

【答案】分析：由已知中程序的功能為用循環(huán)結構計算并判斷自然數n是否為完全數，為累加運算，且要反復進行，可令循環(huán)變量i的初值為1，步長為1，根據題意確定循環(huán)前和循環(huán)體中各語句，即可得到相應的偽代碼和程序框圖．
解答：解：程序框圖如圖…（8分）
QBASIC程序如下：
INPUT  n
s=0
i=1
DO
IF  n MOD i=0  THEN
s=s+i
END  IF
i=i+1
LOOP  UNTIL  i＞=n
IF  s=n   THEN
PRINT“YES”．
ELSE
PRINT“NO”．
END  IF
END…（14分）
點評：本題考查的知識點是設計偽代碼或程序框圖解決實際問題，在一些算法中，也經常會出現從某處開始，按照一定條件，反復執(zhí)行某一處理步驟的情況，這就是循環(huán)結構．循環(huán)結構要在某個條件下終止循環(huán)，這就需要條件分支結構來判斷．在循環(huán)結構中都有一個計數變量和累加變量．計數變量用于記錄循環(huán)次數，累加變量用于輸出結果，計數變量和累加變量一般是同步執(zhí)行的，累加一次，計數一次．