* Thuật toán :

- Bước 1 : nhập r

- Bước 2 : cv ← 2 * r * pi;

- Bước 3 : s ← r * r * pi;

- Bước 4 : xuất giá trị cv và s

- Bước 5 : kết thúc

* Lỗi sai :

- Dòng 1 : sai cú pháp khai báo hằng, dư dấu hai chấm

- Dòng 2 : thiếu chấm phẩy sau integer;

- Dòng 5 : dư clrscr; => chưa khai báo thư viện 

- Dòng 6 : phép gán thiếu dáu hai chấm, thiếu chấm phẩy cuối lệnh gán

- Dòng 7 : phép gán thiếu hai chấm

- Dòng 8 : phép gán thiếu hai chấm 

- Dòng 9 : thiếu dấu phẩy 

* Sửa :

- Var cv, dt : integer;

- R := 5.5;

- Cv := 2 * pi * r;

- Dt := pi * r * r ;

- Writeln('Chu vi la =', cv);