试编写程序计算邮费.doc_第1页
试编写程序计算邮费.doc_第2页
试编写程序计算邮费.doc_第3页
全文预览已结束

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

练习7让默认目录指向“练习7”例1：邮件在100克以内，计费标准为每克0.05元，超出100克后，超出数每克为0.02元。试编写程序计算邮费方法1：根据邮件重量是小于等于100克还是大于100克，用不同的公式计算邮费。在命令窗口内输入以下命令：Modify command yf&建立程序文件yf&在yf程序文件内输入以下命令，输入完成后保存，注意：不是在命令窗口内输入。Input “请输入邮件重量：” to w&由键盘输入的邮件重量保存在变量W内If w100 F=100*0.05+(w-100)*0.02Endif?”邮费为：”,f以上程序保存后，在命令窗口中输入以下命令运行程序do yf1&运行程序yf1学习程序的建立和运行方法，比较以上两程序编写思路有何不同。例2：编写test3.prg，请用户输入待查询人员的姓名，显示该人员基本情况按照上面的程序建立方法建立程序文件test3.prg，把以下程序输入test3.prg程序中，不是命令窗口中。close all&关闭所有数据库及表文件clear&清除屏幕上的所有内容use rcda in 0&在最小未使用的工作区中打开表rcdaselect rcda&选择打开rcda表的工作区做为当前工作区Accept “请输入待查人员姓名：” to nameLocate for 姓名=name&查找所有姓名等于name变量值的记录，name的值取决于输入的值If .not. eof()&记录指针没有到达记录尾的话，即找到符合条件的记录的话 ?”姓名：”+姓名 ?”性别：”+性别?”出生日期：”+DTOC(出生日期,1)else&记录指针到达记录尾的话，即没有找到符合条件的记录的话 ?”查无此人！”endif以上程序保存后，在命令窗口中输入以下命令运行程序do test3&运行程序test3例3：输入两个整数，按由小到大的次序输出这两个数这个问题的算法是作一次比较，若第一个数大于第二个数，则两个数进行对换后输出，若第一个数小于等于第二个数，直接输出。编写程序test2.prg运行它。两个数对的换可通过一个中间变量来实现，如实现A，B对换，可让中间变量TA保存A的值，再让AB把B的值赋给A，最后BT把中间变量T保存的值赋给B。例4：输入3个数a，b，c，要求按由小到大的顺序输出。解此题的算法比上一题稍复杂一些，算法如下：如果ab将a和b对换（a是a，b中的小者）如果ac将a和c对换（a是a，c中的小者，因此a是三者中最小者）如果bc将b和c对换（b是b，c
人人文库> 全部分类> 应用文书 > 技术指导

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论