Question

求1～1000的所有不能被3整除的整數(shù)之和的程序如下：
S=0　　　　　　　　（1）試用直到型循環(huán)結(jié)構(gòu)再寫一次這個程序．
i=1
WHILE　i＜=1000　　（2）編寫求1～1000的所有能被3整除的整
r=i MOD 3　　　　       數(shù)之和的程序．
IF　r＜＞0　THEN
S=S+i
END IF
i=i+1
WEND
PRINT　S
END．

Answer 1

分析：（1）要求試用直到型循環(huán)結(jié)構(gòu)再寫一次這個程序，即DO…LOOP UNTIL 結(jié)構(gòu)，根據(jù)原程序進行書寫；
（2）編寫求1～1000的所有能被3整除的整數(shù)之和，首先S=0，利用WHILE••END IF，進行編程．

解答：解（1）S=0              
    i=1
DO　　　　　　　　　　　　 
r=i MOD 3　　　　　　　　  
IF　r＜＞0　THEN　　　　　　 
S=S+i　　　　　　　　　　　
END IF　　　　　　　　　　　
i=i+1　　　　　　　　　　　 
LOOP UNTIL i＞1000　　　　　
PRINT　S　　　　　　　　　 
END（6分）　　　　　　　
（2）S=0
WHILE  i＜=1000
r=i MOD 3
IF  r=0   THEN
S=S+i
END  IF
i=i+1
WEND
PRINT
END

點評：此題主要考查程序題中的循環(huán)結(jié)構(gòu)和循環(huán)語句的書寫問題，自己編寫程序，有一定的難度，此題是一道中檔題；