作业帮 > 综合 > 作业

(vf题)从键盘输入3个数,求他们的最大值,最小值和平均值.

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/19 11:12:41
(vf题)从键盘输入3个数,求他们的最大值,最小值和平均值.
VF 题~~~
答案需要的是操作命令~~~
clear
dimension a(3)
cstr=""
cstrmax=""
cstrmin=""
cstraverage=""
for i=1 to 3
accept "请输入第"+alltrim(str(i))+"个数:" to a(i)
IF EMPTY(ALLTRIM(a(i)))
MESSAGEBOX("数字不能为空,请重新输入数字","系统提示")
i=i-1
loop
ENDIF
cstr=cstr+a(i)+","
cstraverage=cstraverage+a(i)+"+"
endfor
n=len(cstr)
cstr=left(cstr,n-1)
m=LEN(cstraverage)
cstraverage=LEFT(cstraverage,m-1)
cstrmax="max"+"("+cstr+")"
cstrmin="min"+"("+cstr+")"
cstraverage="("+cstraverage+")"+"/"+alltrim(str(i-1))
"最大值:",EVALUATE(cstrmax)
"最小值:",EVALUATE(cstrmin)
"平均值:",EVALUATE(cstraverage)
提供个另类解法
运行是绝对没有问题了
以上代码存入prg运行即可见效果
觉得是另类请鼓掌撒
哈哈