中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

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
宽城| 电白县| 平乡县| 湘乡市| 太保市| 彩票| 山阳县| 会泽县| 定陶县| 中方县| 桦川县| 柞水县| 宜兴市| 江达县| 东平县| 桐梓县| 新竹市| 宁德市| 克拉玛依市| 若尔盖县| 通州区| 民权县| 宜章县| 平凉市| 鄂伦春自治旗| 九龙坡区| 紫金县| 全州县| 鄱阳县| 深州市| 宁晋县| 宽城| 哈密市| 永春县| 永兴县| 苏州市| 凉山| 株洲县| 疏附县| 遂昌县| 五家渠市|