Câu hỏi:

Cho chương trình Pascal sau:

Program dientich_duongtron;

uses= crt;

const pi = 3.14;

var: dt, r: real;

clrscr;

write(‘nhap ban kinh r = ‘);

readln(r);

dt = pi*sqr(r);

writeln(‘dien tich duong tron la: ‘,dt:10:2, ‘ m’);

readln

End.

Hãy chỉ ra bốn lỗi có trong chương trình, sau đó hãy sửa lại cho đúng.

A.

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:

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

Chọn biểu diễn tên đúng trong các biểu diễn dưới đây:

A. Tinh_DTB

B. Tinh DTB

C. Tinh#DTB

D. 1Tinh_DTB

Câu 4:

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

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