IBM C9050-041 Exam Prep
Programming with IBM Enterprise PL/I (C6030-041) (Page 7 )

DCL B CONTROLLED FIXED BIN(31);
FREE B;
ALLOC B;
ALLOC B;
FREE B;
ALLOC B;
END;
END;

A. 2
B. 3
C. 4
D. 5

Answer(s): B
QUESTION: 16
Given the following code, how many elements of A wil contain a value of 0 after execution of
the loops?

DCL A DIM (8, 10) FIXED BIN (31);
DCL (I, K) FIXED BIN (31) INIT (0);
A = 0;
DO I = 2 TO 8;
DO K = 1 TO 10;
A(I, K) = I*K;
END;
END;

A. 0
B. 1
C. 8
D. 10

Answer(s): D
QUESTION: 17
Given the following code, what value wil be output?

TEST: PROC OPTIONS(MAIN);
DCL
P POINTER,
N1 FIXED BIN(31),
1 A BASED(P),
2 A1 FIXED BIN(31),
2 A2 FIXED BIN(31),
2 A3 FIXED BIN(31),
2 A4( N1 REFER(A3) ) CHAR(10) VAR;
N1 = 5;