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:

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:

Biểu diễn nào dưới đây là biểu diễn hằng trong Pascal:

A. 2.34

B. ’TRUE

C. A51

D. 1,06E-15

Câu 3:

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

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

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

Câu 6:

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