用VF编写程序，完成计算n个数的平均值。

n=""

@ 2,10 say "计算n个数的平均值,先输入数值个数n" get n picture"999999"

read

n=val(n)

DIMENSION x(n)

store 0 to x

s=0

for i = 1 to n

@4,20 say "输入第"+alltrim(str(i))+"个数值" get x(i) picture"999999"

read

s=s+x(i)

endfor

A=s/n

@4,20 say ""+alltrim(str(n))+"个数值的平均值为" +str(A,10,4)

select sum(field1) as sumv, avg(field1) as avgv from table1

**上面语句 可以得到一个 名称为 query 的临时表 合计值 在sumv字段 平均值在 avg 字段

** 必要时 可以语句的后面 加 group by 子句 进行分组

** 也可在 后面 加 where 子句 进行过滤

** 也可以 用 into [array arrayName] [into cursor cursorName] 等 来指定输出

select 学号,姓名,int(avg(数学+英语+信息技术)) as 平均成绩 from xuesheng,chengji

where xuesheng.学号=chengji.学号 group by 姓名 into dbf result order by 学号

---