第6章 结构化程序设计(2)(18)

VFP资料

6.3.2 分支结构方法三 SET TALK OFF CLEAR I

NPUT "请输入邮件重量W=" TO W JF=0.05*W IF W>100 JF= 0.05*100+0.02*(W-100) ENDIF ? "费用为: ", JF SET TALK ON RETURN 0.05*W JF 0.05*100 0.02* (W 100 ) :单分支 W 100 W 100