Hãy tìm những lỗi sai và sửa

----- Nội dung dịch tự động từ ảnh -----
(4 diểm)
Câu 1 (4,0 điểm): Chưong trình sau. Hãy tìm nhơng lỗi sai và sửa lại cho đúng.
Program H C_N;
Uses Crt:
Var a,b,s,ev: Interger:
Begin
While('Nhap chieu dai-"): rendh(a):
Write('Nhap chieu rong "):readla):
s-axb;
cv:(a+b)x2;
Writeln('Dien tich hinh chu nhat la:",s:6:2);
Writelu("Chu vi hinh chu nhat: "ev:6:2):
Readln:
End.
I, THỰC HÀNH (3 điểm)
Câu 1: Viết chương tùnh tinh tổng các số T=1/5+ 1/7 + 19 +..+1/99 bằng hai cách For...do
và While..do.