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:

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

Trong Pascal, khai báo nào sau đây sai:

A. Program Giai_PTB2;

B. Uses crt;

C. Var a, b, c: real;

D. Const pi = 3,14;

Câu 3:

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

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

Trong Pascal, câu lệnh ghép được thực hiện khi sau then hoặc else:

A. Không có câu lệnh nào

B. Có câu lệnh

C. Có nhiều hơn 1 câu lệnh

D. Có nhiều hơn 2 câu lệnh

Câu 6:

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