Câu hỏi:

Cho đoạn chương trình sau:

T := 0 ; i:=1;

WHILE i <= 10 DO

BEGIN

IF i mod 2 = 0 THEN T := T + i ;

i:=i+1;

END;

Sau khi thực hiện, T có giá trị?

A. 18

B. 22

C. 25

D. 30

Câu 1:

Biểu thức toán học dưới đây được biểu diễn trong NNLT Pascal là:

A. a – 1/(1 + x*x*x)

B. a – 1/(1 + sqr(x)*x)

C. a – 1/(1 + x*sqr(x))

D. Cả A, B, C đều đúng

Câu 2:

Cho đoạn chương trình sau:

IF <điều kiện> THEN write(x,’la so duong’) ELSE write(x,’la so am’);

Điều kiện là biểu thức logic nào dưới đây?

A. x mod 2 = 0

B. x > 0

C. x mod 2 = 1

D. x < 0

Câu 3:

Cú pháp khai báo trực tiếp biến mảng một chiều có dạng:

A. Var <tên biến mảng> : array [kiểu chỉ số] of <kiểu phần tử>;

B. Var <tên biến mảng> = array [kiểu chỉ số] of <kiểu phần tử>;

C. Var <tên biến mảng> : array [kiểu chỉ số] of <kiểu phần tử>

D. Var <tên biến mảng> := array [kiểu chỉ số] of <kiểu phần tử>;

Câu 4:

Biểu thức 5*b + a div 4*3 với a =12, b = 4 có giá trị là:

A. 20

B. 21

C. 29

D. 9

Câu 5:

Cho đoạn chương trình sau:

readln(x,y);

IF x > y THEN F:= 2*x – y ELSE

IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;

Nếu nhập vào từ bàn phím x=3 và y=2 thì giá trị của F là:

A. 13

B. 6

C. 4

D. 0

Câu 6:

Xét khai báo biến sau:

Var x, y, z : real;

c : char;

    i, j : integer;

Tổng bộ nhớ dành cho các biến đã khai báo là bao nhiêu byte?

A. 18

B. 19

C. 21

D. 23