Câu hỏi:

19/08/2025 4,248 Lưu

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.

Quảng cáo

Trả lời:

verified Giải bởi Vietjack

a) uses crt;

b) var dt, r: real;

c) Thiếu Begin

d) dt:= pi*sqr(r);

CÂU HỎI HOT CÙNG CHỦ ĐỀ

Lời giải

Đáp án đúng : A

Câu 2

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

Lời giải

Đáp án đúng : A

Câu 3

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>

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Câu 6

A. Tinh_DTB

B. Tinh DTB

C. Tinh#DTB

D. 1Tinh_DTB

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP

Lời giải

Bạn cần đăng ký gói VIP ( giá chỉ từ 199K ) để làm bài, xem đáp án và lời giải chi tiết không giới hạn.

Nâng cấp VIP