COBOL 線上測驗

答案：D

解釋

在 COMP-3 欄位中，符號儲存在最後一個位元組中。

答案：C

解釋

在陣列宣告中，我們可以在基本項和組項上指定 OCCURS 子句。

答案：B

解釋

9(7) 將佔用 7 個位元組，SIGN TRAILING SEPARATE 佔用 1 個位元組，總共佔用 8 個位元組。

答案：B

解釋

WS-ID 將被初始化，數值資料將被替換為語句中提到的 12345。

您可以使用下面提供的嘗試選項嘗試相同的程式碼

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-ID PIC 9(5).
   
PROCEDURE DIVISION.
   A000-FIRST-PARA.
   INITIALIZE WS-ID REPLACING NUMERIC DATA BY 12345.
   DISPLAY WS-ID.
   
STOP RUN.

答案：B

解釋

WS-NUM1 大於 WS-NUM2，因此條件滿足，它將進入 IF 迴圈。

您可以使用下面提供的嘗試選項嘗試相同的程式碼

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-NUM1 PIC 9(9).
   01 WS-NUM2 PIC 9(9).
   
PROCEDURE DIVISION.
   A000-FIRST-PARA.
   MOVE 25 TO WS-NUM1 
   MOVE 15 TO WS-NUM2 
   
   IF WS-NUM1 > WS-NUM2 THEN
      DISPLAY 'IN LOOP 1 - IF BLOCK'
   ELSE
      DISPLAY 'IN LOOP 1 - ELSE BLOCK'
   END-IF.
   
STOP RUN.

答案：B

解釋

B-para 將執行 4 次，因為 WS-A 的初始值為 1，並且我們在每次迭代中將其遞增 1。這裡的條件是 WS-A=5，當此條件滿足時，它將退出迴圈。因此，B-para 將執行 4 次。

您可以使用下面提供的嘗試選項嘗試相同的程式碼

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-A PIC 9 VALUE 0.

PROCEDURE DIVISION.
   A-PARA.
   PERFORM B-PARA VARYING WS-A FROM 1 BY 1 UNTIL WS-A=5
   STOP RUN.
   
   B-PARA.
   DISPLAY 'IN B-PARA ' WS-A.

答案：B

解釋

此語句不正確，因為在進行重寫操作之前，讀取操作必須成功。

答案：B

解釋

逗號不是文字常量。文字常量是常數值。

答案：B

解釋

UNSTRING 動詞用於將一個字串分割成多個子字串。

您可以使用下面提供的嘗試選項嘗試相同的程式碼

IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.

DATA DIVISION.
   WORKING-STORAGE SECTION.
   01 WS-STRING PIC A(30) VALUE 'WELCOME TO TUTORIALSPOINT'.
   01 WS-STR1 PIC A(7).
   01 WS-STR2 PIC A(2).
   01 WS-STR3 PIC A(15).
   01 WS-COUNT PIC 99 VALUE 1.

PROCEDURE DIVISION.
   UNSTRING WS-STRING DELIMITED BY SPACE
      INTO WS-STR1, WS-STR2, WS-STR3
   END-UNSTRING.
   
   DISPLAY WS-STR2.
   
STOP RUN.

答案：D

解釋

COMP-1 佔用 4 個位元組的儲存空間。