C9050-041問題集、IBM実際の試験問題

質問 1

CORRECT TEXT
What is the value of B after executing the following code?
DCLA CHAR(1) INIT(' ');
DCL B BIT(8) BASE D(ADDR(A));
DCL (HIGH, ADDR) BUILTIN;
A = HIGH(1);

A. '40'X

B. 'F1'X

C. '00000000'B

D. '11111111'B

正解: D

質問 2

CORRECT TEXT
What is the value of A in PROC1 after calling PROC2?
PROC1: PROC;
DCLA BIN FIXED(15) INIT(0);
CALL PROC2(A);
END;
PROC2: PROC(A);
DCL A BIN FIXED(15);
A = A + 1;
END;

A. The value of A is undefined.

B. The compiler will generate an error message because A is defined more than once.

C. 1

D. 0

正解: C

質問 3

CORRECT TEXT
Given the following piece of code, what will happen when the code is executed if STRINGSIZE is not enabled?
DCL X CHAR (5) INIT ('ABCDE');
DCL Y CHAR (3) INIT (");
Y = X;

A. The assignment is not executed and program execution abends.

B. The assignment is not executed and program execution continues after the assignment.

C. Y receives the value 'ABC' and the next two bytes following Y's storage are overridden by 'DE'.

D. Y receives the value 'ABC' and 'DE' is not assigned to any storage area.

正解: D

質問 4

CORRECT TEXT
What is the value of B after executing the following code?
DCL A CHAR(10) INIT('123abCDEFG');
DCLB BIN FIXED(31) INIT(5);
B = INDLX(A,'AB');

A. 4

B. 1

C. 0

D. 11

正解: C

質問 5

CORRECT TEXT
A programmer has been asked to write a program that tests a variable, X, and writes out A, B, C or D if X is 0, 1, 2 or 3 respectively and writes out E when X has none of those values. Which of the following programs represents the best practice using IF or SELECT statements?

A. SUB2: PROC (X);
DCL X FIXED UNSIGNED;
IF X < 2 THEN
IF X = 0 THEN
PUT SKIP LIST ('A');
ELSE
PUT SKIP LIST ('B');
ELSE
IF X = 2 THEN
PUT SKIP LIST ('C');
ELSE
IF X = 3 THEN
PUT SKIP LIST ( 'D');
ELSE
PUT SKIP LIST ( 'E');
END;
END;

B. SUB3: PROC( X);
DCL X FIXED UNSIGNED;
SELECT;
WHEN (X = 0)
PUT SKIP LIST ( 'A');
WHEN(X = 1)
PUT SKIP LIST ( 'B');
WHEN( X = 2)
PUT SKIP LIST ( 'C');
WHEN( X = 3)
PUT SKIP LIST ( 'D');
OTHERWISE
PUT SKIP LIST ( 'E');
END;
END;

C. SUB1:PROC(X);
DCL X FIXED UNSIGNED;
IF X = 0 THEN
PUT SKIP LIST ('A');
ELSE
IF X = 1 THEN
PUT SKIP LIST ('B');
ELSE
IF X = 2 THEN
PUT SKIP LIST ('C');
ELSE
IF X = 3 THEN
PUT SKIP LIST ( 'D');
ELSE
PUT SKIP LIST ( 'E');
END;

D. SUB4: PROC( X);
DCLX FIXED UNSIGNED;
SELECT(X);
WHEN ( 0 )
PUT SKIP LIST ( 'A');
WHEN (1)
PUT SKIP LIST ( 'B');
WHEN ( 2)
PUT SKIP LIST ( 'C');
WHEN (3)
PUT SKIP LIST ( 'D');
OTHERWISE
PUT SKIP LIST ( 'E');
END;
END;

正解: D

質問 6

CORRECT TEXT
Given the following code:
DCL (K, L) FIXED BIN (31) INIT G(0);Certified @ TEST-KINGS.COM
DCL SUB ENTRY( FIXED BIN(31) BYADDR, FIXED BIN(31)) OPT IONS(BYVALUE);
CALL SUB(K, L);
PUT(K, L);
and the following external procedure:
SUB: PROCEDUPE(K, L) OPTIONS( BYVALUE); DCL (K BYADDR, L) FIXED BIN(31);
K = 10;
L = 10;
END;
Which numbers are output by the PUT statement?

A. 10,10

B. 0,10

C. 0,0

D. 10,0

正解: D

IBM Programming with IBM Enterprise PL/I - C9050-041 模擬練習