模块 2 · 第 1 课(共 2)课程中的3/10~12 min
模块课程(1/2)
COBOL 算术
在 COBOL 中,可以使用专用动词(ADD、SUBTRACT、MULTIPLY、DIVIDE)或使用通用且富有表现力的 COMPUTE 语句来执行数学运算。
形式动词的算术运算
COBOL 为每个基本算术运算提供了特定的文本指令:
1.添加(ADD)
向变量添加一个或多个值。
COBOL
ADD WS-NUM-A TO WS-NUM-B.
* Equivalent to: WS-NUM-B = WS-NUM-B + WS-NUM-A如果要将结果保存在第三个变量中而不修改加数,请使用 GIVING 子句:
COBOL
ADD WS-NUM-A TO WS-NUM-B GIVING WS-RESULT.2.减法(SUBTRACT)
从一个值中减去另一个值。
COBOL
SUBTRACT 10 FROM WS-BALANCE.
SUBTRACT WS-TAX FROM WS-SUBTOTAL GIVING WS-TOTAL.3. 乘法 (MULTIPLY) 和除法 (DIVIDE)
以类似的方式乘以和除以值。
COBOL
MULTIPLY WS-QTY BY WS-PRICE GIVING WS-TOTAL.
DIVIDE WS-TOTAL BY WS-ITEMS GIVING WS-AVERAGE.计算语句
对于复杂的数学表达式,使用单独的算术动词可能会很长并且难以阅读。 COMPUTE 语句允许您使用与现代语言类似的标准数学运算符(+、-、*、/、** 用于求幂)。
COBOL
COMPUTE WS-TOTAL = (WS-PRICE * WS-QUANTITY) - WS-DISCOUNT.自己尝试一下
锻炼#cobol.m2.l1.e1
尝试:0加载中...
使用 ADD 动词在 PROCEDURE DIVISION 内编写一条语句,将 WS-NUM-A 与 WS-NUM-B 相加,并将结果存储在 WS-RESULT 中。
正在加载编辑器...
显示提示
使用语法:将 WS-NUM-A 添加到 WS-NUM-B,给出 WS-RESULT。
3 次尝试后可用的解决方案
锻炼#cobol.m2.l1.e2
尝试:0加载中...
使用 COMPUTE 语句应用以下公式计算 WS-RESULT 的值:两倍 WS-NUM-A 减去 WS-NUM-B。
正在加载编辑器...
显示提示
在 * 和 - 运算符周围使用空格:COMPUTE WS-RESULT = (WS-NUM-A * 2) - WS-NUM-B。
3 次尝试后可用的解决方案