Câu hỏi:

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 1:

Trong Pascal, cú pháp câu lệnh rẽ nhánh if-then dạng thiếu là:

A. if <điều kiện> then <câu lệnh> ;

B. if <điều kiện> then <câu lệnh>

C. if <điều kiện> then <câu lệnh 1> else <câu lệnh 2> ;

D. if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>

Câu 2:

Xét biểu thức logic: (n >0) and (n mod 2 = 1). Khẳng định nào sau đây là đúng?

A. Kiểm tra n là một số nguyên dương lẻ

B. Kiểm tra xem n có là một số dương

C. Kiểm tra n có chia hết cho 2 không

D. Kiểm tra n là một số nguyên lẻ

Câu 3:

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

Câu 4:

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 5:

Cho biến thực x đã được gán giá trị 12.41235. Để đưa ra màn hình nội dung “x=12.41” cần chọn câu lệnh nào sau đây?

A. Writeln(x);

B. Writeln(‘x=’ ,x:5:2);

C. Writeln(x:5);

D. Writeln(x:5:2);

Câu 6:

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

S := 0 ;

FOR i := 1 to 10 DO

IF (i mod 3=0) or (i mod 5=0) THEN S := S + 1 ;

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

A. 0

B. 5

C. 25

D. 33