COBOL课件第4章过程部初级篇幻灯片.pptVIP

乘法语句的一般格式 4、除法语句DIVIDE 几个示例 DIVIDE A INTO B. B/A=B DIVIDE A INTO B GIVING C. B/A=C DIVIDE A BY B GIVING C. A/B=C 注意INTO 和 BY 的区别！！！ 除法语句的一般格式 允许GIVING后面跟几个标识符 DIVIDE A BY B GIVING C, D, E A/B=C=D=E 如果除不尽，则将多余的位数截去 注意下面的错误用法： DIVIDE A BY B. 语句不完整 DIVIDE A BY 0 GIVING C. 被0除 DIVIDE A INTO 3. 常量 四种算术语句小结 （一）一个语句只能进行一种单一运算 （二）加减法可以进行两个以上的数值量运算，但是乘除法只能在两个量之间进行 （三）GIVING的存在与否将四种运算分成两种类型 用以上四种算术语句实现A*B*C+D3=T A*B*C+D3=T MULTIPLY A BY B MULTIPLY B BY C MULTIPLY D BY D GIVING T MULTIPLY D BY T ADD C TO T IDENTIFICATION DIVISION. PROGRAM-ID. EXAM2A2. ENVIRONMENT DIVISION. DATA DIVISION. WORKING-STORAGE SECTION. 77 N PIC 99. PROCEDURE DIVISION. S. ACCEPT N. IF N=07 ADD 3 TO N. N=? DIVIDE 5 INTO N. N=? SUBTRACT 2 FROM N. N=? MULTIPLY 8 BY N. N=? DISPLAY N. STOP RUN. 5、计算语句COMPUTE （一）算术表达式 由算术初等量（数值常量、数值型数据项）、算术运算符、括号所钩针的式子。 算术表达式中的运算次序（优先级） 括号() 高 单目运算符（正负号） 乘方（* *） 乘（*）、除（/） 加（+）、减（-） 低 （二）计算语句的一般形式 COMPUTE 标识符1, [标识符2]…=算术表达式 如： COMPUTE A = B ** 2 + C * X. COMPUTE T = A. COMPUTE P = 3. COMPUTE A, B = 3 * 5. 4.4 传送语句MOVE MOVE 语句用来实现内存中数据的传送（而不是内存和外设之间的传送）。 MOVE语句的一般格式为： MOVE 标识符1 TO 标识符2 [，标识符3]… 常量1 标识符(identifier)指的是能唯一地标识一个数据项的数据名。 02 A. 03 A1 PIC 99. 03 A2 PIC 99. 02 B. 03 A1 PIC 99. 03 B2 PIC 99. 当需要把A中的A1传送给T时： MOVE A1 OF A TO T. MOVE语句的传送规则： 1，如果接收项和发送项在数据部中描述的类型和长度相同，则按字节一一对应传送。 2，如果接收项和发送项长度不相同，而二者都是数值数据项，则按小数点对齐处理。 3，对字母或字符数据（非数值型数据）的传送，按左对齐处理。 4，初等项和组合项之间可以相互传送。 4.5 转移语句 GO TO GO TO语句改变程序的正常执行程序，例如： A1.ACCEPT B. ACCEPT C. ADD B TO C. A2.DISPLAY C. GO TO A1.