Hãy liệt kê các lỗi dưới đây (nếu có) trong chương trình pascal dưới đây và sửa lại cho đúng: Const Pi : = 3,1416 ; Var cv, dt : integer ; R : real ; Begin R=5,5 Cv : =2*pi*R ; dt : = pi*R*R ; writeln (‘chu vi la=cv’); writeln (‘dien tich la=dt’); Readln End.

2 câu trả lời

(Thiếu khai báo tên, thư viện cho chương trình)

>> program CT;
      uses crt;

_______________________________________________________

Const Pi: =3,1416; (Lỗi: có dấu ":", dấu chia phần nguyên và phần thập phân trong Pascal là dấu ".")

>> Const Pi =3.1416;

____________________________________________________________

cv, dt : integer;                                                                                   

R: real;                (Cú pháp khai báo biến sai, kiểu dữ liệu sai)

Var

>>Var cv, dt, R: real;                

_________________________________________________________________________
R 5,5 (Cú pháp gán giá trị cho biến sai, thiếu ";",dấu chia phần nguyên và phần thập phân trong Pascal là dấu ".")

>> R := 5.5;
___________________________________________________________________

Cv: =2*pi R; (Thiếu "*", giữa dấu ":" và dấu "=" không có khoảng trắng)

>> Cv:=2*pi*R;

_____________________________________________________

writeln ('chu vi la = cv'); (Đặt sai vị trí dấu nháy, in biến CV sai)

>>> writeln ('chu vi la ' ,cv:5:2);
______________________________________________________________________________________

writeln ('dien tich la = cv'); (Đặt sai vị trí dấu nháy, in biến DT sai)

>>> writeln ('dien tich la ' ,dt:5:2);

_________________________________________________________________________________________________

Readin (Nhập sai tên lệnh, thiếu ";")

>>> Readln;
______________________________________________________________________
(Thiếu END)

>>> End.

====================CHƯƠNG TRÌNH ĐÚNG========================
program CT;
uses crt;
Const Pi = 3.1416;
Var cv, dt, R: real;
begin
    clrscr;
    R := 5.5;
    Cv:=2*pi*R;
    dt := pi*R*R;
    writeln ('chu vi la ' ,cv:5:2);
    writeln ('dien tich la ' ,dt:5:2);
    Readln;

End.

________________________________________
#Duahauvn
#HocTot
#ThiTot

P/s: Đây là ĐÁP ÁN CỦA MÌNH trong https://hoidap247.com/cau-hoi/2810526, mik copy qua vì mik thấy câu hỏi giống nhau nha

1,     program CT;
2,     Const Pi:=3,1416;   =>  Const Pi=3.1416; 

3,     cv, dt: integer;        => cv, dt: real;             (Vì R thuộc kiểu real)

4,     R=5,5                     => R:=5.5;

5,    writeln (‘chu vi la=cv’);    =>   writeln('Chu vi la=',CV:5:2);        (:5:2 không có cũng được)

       writeln (‘dien tich la=dt’); => writeln('Dien tich la=',dt:5:2);      (nt)

6,     Readln                   => readln;

*Phần nào còn thắc mắc thì hỏi nhaaa