pic 是定义数据属性的关键字,9(n)是指它是整数类型数据,如果你学过C,那么je pic 9(8)相当于,int je,不同的是je的长度是8位!V是小数点,标志符,它标识小数点的位置,也就是说,9(8)V9(2)是定义了一个,整数部分有8位,而小数部分有两位,的一个数值型类型!至于,你也的bje pic ---,---...
要使用COBOL读取输入数据并生成九九加法表,你可以使用以下语句将公式排列成金字塔形式:```cobolIDENTIFICATION DIVISION.PROGRAM-ID. NINE-NINE-ADDITION.DATA DIVISION.WORKING-STORAGE SECTION.01 ROWS PIC 9 VALUE 9.01 COUNTER PIC 9 VALUE 1.01 MULTIPLIER PIC 9 VALUE 1.01 MULTIPLICAND PIC 9 ...
PIC S9(9) BINARY 相当于 PIC S9(9) COMP 都是二进制储存, 所谓的长度,如果是指BYTE数的话,应该是四个BYTE(注:COMP型算法) 如果是指BIT数,那就是32个BIT, 也就是相当于定义成 PIC 1(32) BIT 分析总结。 所谓的长度如果是指byte数的话应该是四个byte注结果...
PIC -9(4) 是正确的。 定义是表示形数字4位的值。负号的话表示为 -1211。
1 如果你的意思是 MOVE 123 TO A,变量A的类型是 PIC 9(5),且 A= 45678的话,那么赋值后的A=00123,如果A的类型是 PIC X(5) 的话,赋值后的A=’123 ‘2 应该是先执行段落然后再判断条件的 3 这个是先判断 在执行循环体 4 当读到最后一条记录时执行操作 希望满意 ...
PIC 9(09)表示仅保存0和正数,可以保存的最大数值为十进制的999999999。COMP-5,二进制的一种存储类型,存储顺序和硬件机型有关,和COMP刚好相反,比如65534这个数值,如果定义为COMP,则在一般机器中,存储顺序为"FFFE",如果定义成COMP-5,存储顺序则为"FEFF"。VALUE 6表示初值为6。002490 02 PIC 9...
结果是5535, 9型是右对齐,所以最后的6就放入上一个定义变量中去了:举例来说: 01 A PIC 9(4) COMP 01 B PIC 9(4) COMP MOVE 0 TO A MOVE 65535 TO B 结果: B = 5535 存储器中 0001 0101 1001 1111 A = 6 存储器中 0000 0000 0000 0110 当然,这是因为9(1) ~...
01 COUNTNUM PIC 9(02).01 NUM PIC X(36).01 NUMR REDEFINES NUM.03 NUMAREA OCCURS 9 05 NUMA PIC 9(02).05 NUMB PIC X(02).MOVE SPACE TO NUM.PERFORM VARYING IDX1 FROM 1 BY 1 UNTIL IDX1 > 9 PERFORM VARYING IDX2 FROM 1 BY...
结果是5535, 9型是右对齐,所以最后的6就放入上一个定义变量中去了: 举例来说: 01 A PIC 9(4) COMP 01 B PIC 9(4) COMP MOVE 0 TO A MOVE 65535 TO B 结果:B = 5535 存储器中 0001 0101 1001 1111 A = 6 存储器中 0000 0000 0000 0110 当然,这是因为9(1) ~ 9(4) COMP都占用2个bit关...
DATA DIVISION中的FILE SECTION里定义文件的field时, 把相应的字段定义为数字型的就可以了。比如FILE SAMPFILE中一个RECORD的长度是40,你想把前五位读成数字型:DATA DIIVISION.FILE SECTION.FD SAMPFILE.01 SAMPFILE-REC.05 SAMPFILE-NUM PIC 9(8).05 FILLER PIC X(32)....