COMPUTE命令将算术表达式的值分配给指定的引用。COMPUTE关键字不能缩写。 COMPUTE参考=expression; 参考 有效的z/OS® DebuggerCOBOL 数字引用。 表达式 有效的z/OS DebuggerCOBOL 数字表达式。 使用说明 如果要调试优化的 COBOL 程序,那么仅当您首先输入SET WARNING OFF命令时,才能使用COMPUTE命令将值指定给程序变量。
括号> ** > * / > + - 9.算术统计运算 COMPUTE 统计运算:总和,中位数,平均数 计算总和:COMPUTE sum-name = FUNCTION SUM(name1 name2 name3) 计算中位数:COMPUTE midle-name = FUNCTION MEDIAN(name1 name2 name3) 计算平均数:COMPUTE average-name = FUNCTION MEAN(name1 name2 name3) 1.关系运算...
统计算术运算只能通过COMPUTE 语句实现。并且，这也是COBOL-85版本所推出的新功能，只能在COBOL-85版本中使用。3种统计算术运算的基本格式分别如下。计算总和：COMPUTE sum-name = FUCTION SUM (name1 name2 name3 …)。计算中位数：COMPUTE middle-name = FUCTION MEDIAN (name1 name2 name3 …)。
语法:COMPUTE 标识符1[,标识符2]……=算术表达式 举例:COMPUTE T = (A + B) * C / D 注意:(1)所以运算符两侧应留一空格 (2)括号外侧应留空格,内侧可不要留空格 三.MOVE(传送语句) 语法:MOVE 标识符1/常量1 TO 标识符2[,标识符3]…… 四.GOTO(转移语句) 语法:(1)GO TO 过程名 (2)GO TO...
Compute 语句用于在 COBOL 中编写算术表达式。这是加、减、乘和除的替代品。 Example IDENTIFICATION DIVISION. PROGRAM-ID. HELLO. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-NUM1 PIC 9(9) VALUE 10 . 01 WS-NUM2 PIC 9(9) VALUE 10. 01 WS-NUM3 PIC 9(9) VALUE 10. 01 WS-NUMA PIC ...
COMPUTE Z=X-Y. END PROGRAM SUB. GLOBAL & EXTERNAL通常,数据和文件都是局部的,但也可以定义全局数据和文件— —GLOBAL子句GLOBAL只能用于01层,其所有下层数据均具有全局特性, 可以被任何子程序引用。 但是子程序中定义同名的数据项会将父程序中GLOBAL数据项覆盖,可以使用EXTERNAL子句EXTERNAL...
5。COMPUTE 语句：COMPUTE 标识符1 [，标识符2 ]。。。= 算术表达式 运算的优先级由⾼到低顺序为：（），正负号，**（次⽅），* 或 / ，+ 或 - 如：C = 3 ，D = 5 ，E = 2 ， F = 1 则：COMPUT A，B = -（C + D）* 2 / E ** 3 - F = -3 注意1。每个语...
COMPUTE 1900 - (1900 / 400) * 400 对于整数来说 这样一条语句就可以求余了 除的运算尽量不要用 DIVIDE DIVIDE求余要用remainder
COMPUTE (Reserved Words) 100 (No Alphabet) 100+B (+ is not allowed) 等级数 级别数是用来指定数据的记录中的级别。它们被用于基本事项和基件之间进行区分。基本项目可以分组以创建组的项目。 级别数 描述 01 记录描述项 02 to 49 分组初级项目
COMPUTEassigns a value only to a single receiver; unlike COBOL, multiple receiver variables are not supported. The COBOLEQUALkeyword is not supported ("=" must be used). The COBOLROUNDEDandSIZE ERRORphrases are not supported, soEND-COMPUTEis not supported. ...