全国计算机等级考试二级VFP习题及答案:第七章5
7、从键盘任意输入N个数,去掉其中最大值和最小值,然后求平均值。程序代码:
SET TALK OFF
CLEAR
S=0
INPUT "N=" TO N
STORE N TO MAX,MIN
FOR I=1 TO N
INPUT "B=" TO B
S=S+B
IF MAX<B p MAX=B/pp ENDIF/pp IF MIN>B
MIN=B
ENDIF
ENDFOR
?"AVERAGE="+STR((S-MAX-MIN)/(N-2),19,2)
SET TALK ON
8、利用参数传递和过程文件,求(M!+N!)/(M-N)!
程序代码:
SET TALK OFF
CLEAR
SET PROC TO 程序20
INPUT "M=" TO M
INPUT "N=" TO N
STORE 0 TO SM,SN
DO JC2 WITH M,SM
DO JC2 WITH N,SN
DO MC2 WITH M-N,N
?"表达式结果为S="+STR((SM+SN)/N,10,2)
SET PROC TO
SET TALK ON
PROC JC2
PARA X,Y
I=1
T=1
DO WHILE I
页:
[1]