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

(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 cv, dt, R: real;                

Var
_________________________________________________________________________
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