3、從鍵盤輸入一個正整數(shù),判斷其所含5的個數(shù)。(如:輸入數(shù)值2345105,其中包含5的個數(shù)為2)
程序代碼:
SET TALK OFF
clear
INPUT "請輸入一個正整數(shù)X:" TO X
S=0
DO WHILE .T.
N=MOD(X,10) &&第一次求X的個位數(shù)N,第二次求X的十位數(shù)N,…
IF N=5
S=S+1
ENDIF
X=INT(X/10)
IF X=0
EXIT
ENDIF
ENDDO
?"X中5的個數(shù)為:",S
SET TALK ON
4、從鍵盤輸入20個數(shù),去掉20個數(shù)中的最大值和最小值,然后求平均值。
程序代碼:
SET TALK OFF
CLEAR
S=0
N=1
STORE 0 TO MAX,MIN
DO WHILE N<=20
INPUT "B=" TO B
S= S+B
IF MAX
MAX=B
ENDIF
IF MIN>B
MIN=B
ENDIF
N=N+1
ENDDO
?"AVERAGE="+ STR((S-MAX-MIN)/18,19,2)
SET TALK ON
相關(guān)推薦:
2010年9月計算機等級考試沖刺備考指導(dǎo)專題 2010全國計算機等級考試二級VF輔導(dǎo)筆記匯總
免費版:2010計算機等考二級VF考前沖刺題匯總 計算機等級考試二級VFP上機試題及答案匯總