用visual foxpro6.0 编写一个简单的程序.

来源：百度知道 编辑：UC知道 时间：2024/05/23 18:19:13
不管哪一方面.只要能运行成功就好，不要太简单也不要太复杂。

天!这是什么要求啊!呵呵,你是想学一下吧,给你小程序先:
程序功能:输入秒,输出几分几秒.
clea
se=00
mi=0
@4,4 say '输入所用秒数:' get se &&这里根据你的程序,可以
read && 直接调用你设置的变量
if se<60
@6,4 say '您的得分是:'+' '+'秒'
@6,16 say allt(str(se))
else
@6,4 say '您的得分是:'+' '+'分'+' '+'秒'
mi=int(se/60)
se=mod(se,60)
@6,16 say allt(str(mi))
@6,22 say allt(str(se))
endif
retu