cobol负数赋值的方法是什么

在COBOL中，可以使用负号 “-” 来表示负数。可以直接在数据项上加上负号来表示一个负数，例如：

01 NEG-NUMBER PIC S9(4)V99.
MOVE -123.45 TO NEG-NUMBER.

在上面的例子中，NEG-NUMBER是一个带有符号位的数值类型数据项，可以存储带有2位小数的4位数整数。使用MOVE语句将-123.45赋值给NEG-NUMBER，表示一个负数。