Hãy tìm lỗi đoạn chương trình sau và sửa lại cho đúng

----- Nội dung dịch tự động từ ảnh -----
+BÀI 1: Hãy tìm lỗi đoạn chrơng trinh sau và sửa lại cho đúng:
Program Vi_du;
Var a,b.c.s: Integer;
Begin
Write('nhap chieu dai a ='); readln(*a');
Write('nhap chieu rong b='); readln('b');
S:=a*b
C:=(a+b)x2;
Write('dien tich hinh chu nhat la: ', 'S');
Write('chu vi hinh chu nhat la: ','C');
Readln;
End