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:

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

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