UC知道关于VF的编程问题
来源：百度知道 编辑：UC知道 时间：2024/09/25 19:20:30
【考试内容】
一、 编写如下2个子程序，分别取程序名sub1,sub2。子程序要求：
(1) 从键盘上输入十个数，在屏幕上输出这十个数中的最大数和最小数
(2) 编写程序输出以下图形
1
2 2
3 3 3
4 4 4 4
3 3 3
2 2
1
二、编写一菜单主程序（程序名 main.prg），用来调用上面的几个子程序sub1,sub2。菜单要求：可以任意次显示，有选择容错功能和退出机制。
【程序清单】
请能人帮我一下,,,,很急是作业........谢谢了.
一、 编写如下2个子程序，分别取程序名sub1,sub2。子程序要求：
(1) 从键盘上输入十个数，在屏幕上输出这十个数中的最大数和最小数
(2) 编写程序输出以下图形
1
2 2
3 3 3
4 4 4 4
3 3 3
2 2
1
二、编写一菜单主程序（程序名 main.prg），用来调用上面的几个子程序sub1,sub2。菜单要求：可以任意次显示，有选择容错功能和退出机制。
【程序清单】
请能人帮我一下,,,,很急是作业........谢谢了.
前两天刚帮人做完,你们是一个学校的吧???
main.prg
set talk off
set exac off
clea all
close all
clea
on readerror do err
set colo to
set sysmenu to
set sysmenu automatic
do while .t.
define pad _ppp1 of _msysmenu prompt "数据计算"
define pad _ppp2 of _msysmenu prompt "退出系统"
on pad _ppp1 of _msysmenu activate popup _hg1
on pad _ppp2 of _msysmenu activate popup _hg2
define popup _hg1 margin relative shadow colo 8
define bar 1 of _hg1 prompt "选大小"
define bar 2 of _hg1 prompt "显示图形"
on selection bar 1 of _hg1 do sub1
on selection bar 2 of _hg1 do sub2
define popup _hg2 margin relative shadow colo 9
define bar 1 of _hg2 prompt "退出系统"
on selection bar 1 of _hg2 do gohome
acti menu _msysmenu
enddo
retu
sub1.prg 选大小程序
clea
dime x(10)
y=0
store 0 to x
j=10
for