亚洲激情专区-91九色丨porny丨老师-久久久久久久女国产乱让韩-国产精品午夜小视频观看

溫馨提示×

cobol二維數組怎么定義和使用

小億
194
2023-10-13 19:51:21
欄目: 編程語言

在COBOL中,二維數組可以通過定義一個帶有多個下標的表來實現。下面是一個定義和使用COBOL二維數組的示例:

01 MY-ARRAY.
05 ROWS OCCURS 5 TIMES.
10 COLS OCCURS 10 TIMES PIC X(10).
PROCEDURE DIVISION.
MOVE 'Value1' TO COLS(1,1)   -- 設置第一行第一列的值
MOVE 'Value2' TO COLS(1,2)   -- 設置第一行第二列的值
DISPLAY 'Value in row 1, col 1: ' COLS(1,1)   -- 顯示第一行第一列的值
DISPLAY 'Value in row 1, col 2: ' COLS(1,2)   -- 顯示第一行第二列的值
STOP RUN.

在上面的示例中,定義了一個名為MY-ARRAY的二維數組,它有5行和10列。然后,可以使用COLS(行號, 列號)語法來訪問和操作特定行和列的值。

在PROCEDURE DIVISION部分,通過MOVE語句設置了第一行第一列和第一行第二列的值。然后,使用DISPLAY語句顯示了這些值。

注意:在COBOL中,數組的下標從1開始,而不是從0開始。

0
台东市| 河西区| 屏边| 隆昌县| 昂仁县| 遂宁市| 泸水县| 蒲江县| 炎陵县| 杭锦旗| 弥勒县| 横峰县| 库车县| 黄梅县| 久治县| 新闻| 兖州市| 长治县| 荣成市| 沙田区| 鸡西市| 安福县| 沂水县| 乌鲁木齐县| 卢氏县| 义马市| 建昌县| 友谊县| 鄂伦春自治旗| 宝兴县| 五莲县| 成武县| 仁化县| 洮南市| 土默特右旗| 铜山县| 彰化县| 潞城市| 延津县| 朝阳区| 定南县|