posts - 2,  comments - 0,  trackbacks - 0

clear
a=0
b=0
@ 1,2 say "请输入 a:" get a
read
@ 2,2 say "请输入 b:" get b
read
if a>b
 max1=a
 min1=b
 @ 3,2 say ""
 ??"max=",max1,"min=",min1
else
 if a=b
  @ 3,2 say ""
  ??"a=b"
 else
  max1=b
  min1=a
  @ 3,2 say ""
  ??"max=",max1,"min=",min1
 endif
endif
 
修改后:
clear
a=0
b=0
@ 1,2 say "请输入 a:" get a
read
@ 2,2 say "请输入 b:" get b
read
@3,2 say ""
if a=b
 ??"a=b"
else
 if a>b
  max1=a
  min1=b
 else
  max1=b
  min1=a
 endif
 * ??"max=",max1,"min=",min1
 ??"max="+str(max1)+"min="+str(min1)
endif

posted on 2005-05-19 14:03 Are you ready? 阅读(113) 评论(0)  编辑 收藏 引用
只有注册用户登录后才能发表评论。