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

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

Cho khai báo biến sau đây:

Var m, n : integer ;

  x, y : real ;

Lệnh gán nào sau đây là sai ?

A. m := -4 ;

B. n := 3.5 ;

C.  C. x := 6.5 ;

D. y := +10.5 ;

Câu 4:

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

Giả sử mảng a gồm các phần tử a[1]=1, a[2]=2, a[3]=3, a[4]=4, a[5]=5.

Cho biết kết quả sau khi thực hiện đoạn chương trình sau:

S:=0;

FOR i:=1 to 5 DO

IF a[i] mod 2 = 0 THEN S:=S+a[i];

writeln(‘S = ’,S);

A. 6

B. S = 6

C. 9

D. S = 9

Câu 6:

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ẻ