程序设计基PPT学习教案_第1页
程序设计基PPT学习教案_第2页
程序设计基PPT学习教案_第3页
程序设计基PPT学习教案_第4页
程序设计基PPT学习教案_第5页
已阅读5页,还剩50页未读 继续免费阅读

下载本文档

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

文档简介

1、会计学1程序设计基程序设计基n(1)从“文件”菜单中选取“保存”命令(2)按“CTRL+W”组合键 。n编辑程序(1)在“文件”菜单中选择“打开”命令(2)命令窗口中:MODIFY COMMAND 第1页/共55页第2页/共55页若运行其他的程序则扩展名不能省;第3页/共55页第4页/共55页第5页/共55页第6页/共55页第7页/共55页第8页/共55页第9页/共55页第10页/共55页第11页/共55页第12页/共55页次,这些程序段不在一个固定的位置上,而是分散在程序的许多位置上重复执行,可将其与嵌入它的程序分开,形成独立的程序序列,待使用时再调入程序中,以实现不同位置上的重复操作。这样

2、做增强了程序的可读性和模块化。我们称这种具有独立功能而且可以被其它程序调用的程序序列为过程。第13页/共55页第14页/共55页第15页/共55页第16页/共55页第17页/共55页 真 条 件 式 假 语 句 序 列2 语 句 序 列1 ENDIF后 面 语 句 第18页/共55页例:输入两个实数,求它们的最大值。set talk offclearinput “实数a=” to ainput “实数b=” to bif a=b max=aelse max=bendif? a,”与”,b,”中的最大值为:”,maxreturn第19页/共55页也可以用单分支的选择语句来实现set talk o

3、ffclearinput “实数a=” to ainput “实数b=” to bmax=aif ba max=bendif? a,”与”,b,”中的最大值为:”,maxreturn第20页/共55页例:输入一个大于例:输入一个大于0的年份值,判断该一年份是否的年份值,判断该一年份是否是闰年,如果是闰年,就输出是闰年,如果是闰年,就输出“xxxx年是闰年年是闰年”,否则输出,否则输出“xxxx年不是闰年年不是闰年”。.闰年的条件是:能被闰年的条件是:能被4整除但不能被整除但不能被100整除,或整除,或能被能被100整除且能被整除且能被400整除。整除。 第21页/共55页 真 条件式 2 语句

4、序列 1 ENDCASE 后面语句 条件式 n-1 Otherwise 条件式 1 真 语句序列 2 真 语句序列 n-1 有 语句序列 n 无 第22页/共55页【例】假设收入(P)与税率(R)的关系如下表,编程求税金。程序文件名为TAX.PRG。 0 , P800R= 0.05 , 800 P2000 0.08 , 2000P5000 0.1 , P5000第23页/共55页SET TALK OFFCLEARINPUT “请输入收入:” TO PDO CASE CASE P800 R=0 CASE P2000 R=0.05 CASE P=b,a,b)? a,”与”,b,”中的最大值为:”,

5、maxreturn第27页/共55页例:用IIF( )来实现P.163 例6-7。文件名exam_if_1.prgset talk offclearinput “实数x=” to xy=iif(x0,iif(x10,x*x+1,3*x*x-2*x+1),x*x+4*x-1)? “分段函数值为:”+str(y,10,2)set talk onreturn第28页/共55页 第29页/共55页 E N D D O 后 面 的 语 句 条 件 表 达 式 式 真 循 环 体 假 第30页/共55页?“246100”,SSET TALK ONRETURN第31页/共55页ENDDOUSECLOSE D

6、ATABASERETURN第32页/共55页说明:说明:1. 什么是完全平方数?什么是完全平方数? 一个数如果是另一个整数的完全平方,那么我们一个数如果是另一个整数的完全平方,那么我们就称这个数为完全平方数,也叫做平方数。例如:就称这个数为完全平方数,也叫做平方数。例如:0,1,4,9,16,25,36,49,64,81,100,121,144,169,196,225,256,289,324,361,4002. 什么是完全立方数?什么是完全立方数?一个数如果是另一个整数的完全立方,那么我们就称一个数如果是另一个整数的完全立方,那么我们就称这个数为完全立方数,也叫做立方数。例如:这个数为完全立方

7、数,也叫做立方数。例如:1,8等等第33页/共55页,I=I+1ENDDOSET TALK ONreturn第34页/共55页 第35页/共55页第36页/共55页第37页/共55页第38页/共55页第39页/共55页第40页/共55页ENDSCANUSECLOSE DATABASESET TALK ONRETURN第41页/共55页 多重循环即循环的嵌套多重循环即循环的嵌套,是指在一个循环结构的,是指在一个循环结构的循环体中又包含另一个循环。循环体中又包含另一个循环。 外循环外循环我们称外层循环为我们称外层循环为外循环外循环 内循环内循环被包含的循环为被包含的循环为内循环内循环。 嵌套层数一

8、般没有限制,但内循环的循环体必须嵌套层数一般没有限制,但内循环的循环体必须完全包含在外循环的循环体中,不能相互交叉。完全包含在外循环的循环体中,不能相互交叉。第42页/共55页下面是一个DO WHILEENDDO循环嵌套的一般形式:DO WHILE DO WHILE ENDDO ENDDO 第43页/共55页下面是一个DO WHILEENDDO循环嵌套一个FOR 循环的一般形式:DO WHILE FOR = TO STEP ENDFOR|NEXT ENDDO 第44页/共55页下面是一个FOR循环嵌套另一个FOR循环的一般形式:FOR = TO STEP FOR = TO STEP ENDFOR|NEXT ENDFOR|NEXT第45页/共55页下面是一个FOR循环嵌套一个DO WHILEENDDO循环的一般形式:

温馨提示

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

评论

0/150

提交评论