试编写程序计算邮费.doc
练习7
让默认目录指向“练习7”
例1:邮件在100克以内，计费
标准
excel标准偏差excel标准偏差函数exl标准差函数国标检验抽样标准表免费下载红头文件格式标准下载
为每克0.05元，超出100克后，超出数每克为0.02元。试编写程序计算邮费
方法
快递客服问题件处理详细方法山木方法pdf计算方法pdf华与华方法下载八字理论方法下载
1:根据邮件重量是小于等于100克还是大于100克，用不同的
公式
小学单位换算公式大全免费下载公式下载行测公式大全下载excel公式下载逻辑回归公式下载
计算邮费。
在命令窗口内输入以下命令:
Modify command yf &&建立程序文件yf
&&在yf程序文件内输入以下命令，输入完成后保存，注意:不是在命令窗口内输入。
Input “请输入邮件重量:” to w &&由键盘输入的邮件重量保存在变量W内 If w<=100
F=w*0.05
Else
F=100*0.05+(w-100)*0.02
Endif
?”邮费为:”,f
以上程序保存后，在命令窗口中输入以下命令运行程序
do yf &&运行程序yf
方法2:先按第一个公式计算邮费，若发现邮件重量大于100克，再按第二个公式计算邮费。
在命令窗口内输入以下命令:
Modify command yf1 &&建立程序文件yf1
&&在yf1程序文件内输入以下命令，输入完成后保存，注意:不是在命令窗口内输入。
Input “请输入邮件重量:” to w &&由键盘输入的邮件重量保存在变量W内 F=w*0.05
If w>100
F=100*0.05+(w-100)*0.02
Endif
?”邮费为:”,f
以上程序保存后，在命令窗口中输入以下命令运行程序
do yf1 &&运行程序yf1
学习程序的建立和运行方法，比较以上两程序编写思路有何不同。
例2:编写test3.prg，请用户输入待查询人员的姓名，显示该人员基本情况
按照上面的程序建立方法建立程序文件test3.prg，把以下程序输入test3.prg程序中，不是命令窗口中。
close all &&关闭所有数据库及
表
关于同志近三年现实表现材料材料类招标技术评分表图表与交易pdf视力表打印pdf用图表说话 pdf
文件
clear &&清除屏幕上的所有
内容
财务内部控制制度的内容财务内部控制制度的内容人员招聘与配置的内容项目成本控制的内容消防安全演练内容
use rcda in 0 &&在最小未使用的工作区中打开表rcda
select rcda &&选择打开rcda表的工作区做为当前工作区
Accept “请输入待查人员姓名:” to name
Locate for 姓名=name &&查找所有姓名等于name变量值的记录，name的值取决于输入的值
If .not. eof() &&记录指针没有到达记录尾的话，即找到符合条件的记录的话
?”姓名:”+姓名
?”性别:”+性别
?”出生日期:”+DTOC(出生日期,1)
else &&记录指针到达记录尾的话，即没有找到符合条件的记录的话
?”查无此人～”
endif
以上程序保存后，在命令窗口中输入以下命令运行程序
do test3 &&运行程序test3
例3:输入两个整数，按由小到大的次序输出这两个数
这个问题的算法是作一次比较，若第一个数大于第二个数，则两个数进行对换后输出，若第一个数小于等于第二个数，直接输出。编写程序test2.prg运行它。两个数对的换可通过一个中间变量来实现，如实现A，B对换，可让中间变量T,A保存A的值，再让A,B把B的值赋给A，最后B,T把中间变量T保存的值赋给B。
例4:输入3个数a，b，c，要求按由小到大的顺序输出。
解此题的算法比上一题稍复杂一些，算法如下:
如果a>b将a和b对换 (a是a，b中的小者)
如果a>c将a和c对换 (a是a，c中的小者，因此a是三者中最小者) 如果b>c将b和c对换 (b是b，c中的小者，也是三者中次小者) 然后顺序输出a,b,c即可。编写程序test1.prg运行它。
2x,1(x,0),
,3x，5(0,,x,3,,f(x),x，1(3,,x,5)例5:计算分段函数值: ,
,5x,3(5,,x,10),
,7x，2(x,,10),
浙公网安备 33021202002483