giúp tớ <333333 Hãy chỉ ra lỗi trong chương trình sau và viết lại cho đúng: Const pi := 3.1416; Var cv : integer R :real; Begin R = 5.5; cv := 2*pi*r; Writeln(‘chu vi la:= cv’); Readln End.

Lỗi:

- Thiếu khai báo thư viện. Bổ sung ở đầu: uses crt;

- Khai báo hằng sai cú pháp. Cú pháp: Const = <giá trị>;

- Sau lệnh "Var cv : integer" thiếu dấu ;, kiểu dữ liệu phải là real vì có lệnh "cv := 2*pi*r;" đáp án của cv là số thực.

- Lệnh gán "R = 5.5;" sai. Lệnh gán là <biến> := <giá trị>;

- Writeln(‘chu vi la:= cv’); bị sai về lỗi ngữ nghĩa. In giá trị biến cv vừa tính thì phải đưa biến cv ra ngoài dấu nháy và sau đó có dấu phẩy.

Sửa:

uses crt;

Const pi = 3.1416;

Var cv : integer;

R :real;

Begin

R := 5.5;

cv := 2*pi*r;

Writeln(‘chu vi la:= ', cv);

Readln

End.