次の COBOL プログラムの説明及びプログラムを読んで，設問１〜３に答えよ。

〔プログラムの説明〕

　1993 年４月１日に創立したＸ社では，創立 20 周年の記念日である 2013 年４月１日に， 勤続年数が０〜 20 年の全ての従業員に特別給を支給することにした。特別給は，基本給に， 表１に示す決定表によって導出される支給係数を掛け合わせて百円未満を切り捨てた金額であり， 創立記念日に上司が現金の入った封筒を部下に手渡す。 このプログラムは，従業員ファイルに格納されている従業員の情報を読み込み， 各従業員への支給金額と，各金種の必要数を支給ファイルに出力する。ここで， 金種は１万円紙幣，５千円紙幣，千円紙幣，５百円硬貨，百円硬貨の５種類とする。

　　　　　　　表１　支給係数の決定表

(1) 従業員ファイルは，図１に示すレコード様式の順ファイルである。

〔プログラム〕

（行番号）

 1  DATA DIVISION.
 2  FILE SECTION.
 3  FD EMP-F.
 4  01 E-REC.
 5     02 E-NO            PIC 9(6).
 6     02 E-STATUS        PIC 9(1).
 7        88 NON-MANAGER     VALUE 0.
 8        88 MANAGER         VALUE 1.
 9     02 E-JOIN.
10        03 E-YEAR          PIC 9(4).
11        03 E-MMDD          PIC 9(4)
12     02 E-BASE          PIC 9(6).
13  FD PAY-F.
14  01 P-REC.
15     02 P-NO            PIC 9(6).
16     02 P-PAY           PIC 9(6).
17     02 P-CUR-TBL.
18        03 P-CUR           PIC 9(2) OCCURS 5.
19  WORKING-STORAGE SECTION.
20  77 EMP-FLAG        PIC X(1) VALUE SPACE.
21     88 EMP-EOF         VALUE "E".
22  77 W-YEAR          PIC 9(2).
23     88 UPTO-3          VALUE  0 THRU 3.
24     88 UPTO-9          VALUE  4 THRU 9.
25     88 UPTO-20         VALUE 1O THRU 20.
26  77 PAY-RATE        PIC 9V99.
27  77 W-PAY           PIC 9(6).
28  01 CUR-VALUE       PIC X(25) VALUE "1000005000010000050000100".
29  01 CUR-TBL REDEFINES CUR-VALUE.
30     02 CUR-KIND        PIC 9(5) OCCUR 5.
31  01 CNT             PIC 9(1).
32  PROCEDURE DIVISION.
33  MAIN-PROC.
34      OPEN INPUT  EMP-F
35           OUTPUT PAY-F.
36      PERFORM UNTIL EMP-EOF
37         READ EMP-F AT END     SET EMP-EOF TO TRUE
38                    NOT AT END MOVE E-NO TO P-NO
39                               PERFORM DEC-PROC
40                               PERFORM CUR-PROC
41                               WRITE P-REC
42         END-READ
43      END-PERFORM.
44      CLOSE EMP-F PAY-F.
45      STOP RUN.
46  DEC-PROC.
47      COMPUTE W-YEAR = 2013 - E-YEAR.
48      IF  THEN
49         SUBTRACT 1 FROM W-YEAR
50      END-IF.
51      EVALUATE TRUE
52         WHEN UPTO-3  AND NON-MANAGER
53            MOVE 0.05 TO PAY-RATE
54         WHEN UPTO-3  AND MANAGER
55         WHEN UPTO-9  AND NON-MANAGER
56            MOVE 0.10 TO PAY-RATE
57         WHEN UPTO-9  AND MANAGER
58         WHEN UPTO-20 AND NON-MANAGER
59            MOVE 0.15 TO PAY-RATE
60         WHEN UPTO-20 AND MANAGER
61            MOVE 0.20 TO PAY-RATE
62      END-EVALUATE.
63      COMPUTE P-PAY = E-BASE * PAY-RATE.
64      DIVIDE 100 INTO P-PAY.
65      MULTIPLY 100 BY P-PAY.
66  CUR-PROC.
67      INITIALIZE P-CUR-TBL.
68      MOVE 1 TO CNT.
69      MOVE P-PAY TO W-PAY.
70      PERFORM UNTIL W-PAY = 0
71         IF W-PAY >= CUR-KIND(CNT) THEN
72            AND 1 TO P-CUR(CNT)
73            
74         ELSE
75            
76         END-IF
77      END-PERFORM.

設問１　プログラム中の に入れる正しい答えを， 解答群の中から選べ。

a に関する解答群

b，c に関する解答群

基本情報技術者試験

解答群

基本情報技術者試験

　　　　　　表２　プログラムの変更

処置	変更内容
行番号 30 と 31 の 　間に追加	01 CUR-TBL-X REDEFINES CUR-VALUE. 02 CUR-KIND-X PIC X(5) OCCURS 5. 01 TOTAL-TBL. 02 CUR-TOTAL PIC 9(8) OCCURS 5 VALUE ZERO. 01 TOTAL-TBL-X REDEFINES TOTAL-TBL. 02 CUR-TOTAL-X PIC 9(8) OCCURS 5.
	PERFORM VARYING CNT FROM 1 BY 1 UNTIL CNT > 5 DISPLAY CUR-KIND-X(CNT) " : " CUR-TOTAL-X(CNT) END-PERFORM.
行番号 77 の後ろに 　追加	PERFORM VARYING CNT FROM 1 BY 1 UNTIL CNT > 5 END-PERFORM.

d に関する解答群

e に関する解答群