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:

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

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

Biểu thức 5*b + a div 4*3 với a =12, b = 4 có giá trị là:

A. 20

B. 21

C. 29

D. 9

Câu 5:

Phát biểu nào sau đây có thể lấy làm biểu thức điều kiện trong cấu trúc rẽ nhánh?

A. A + B

B. A * B

C. A := B

D. A ≤ B

Câu 6:

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