Hãy tìm các lỗi và sửa lại

Hãy tìm các lỗi và sửa lại
Program tinhtbcong;
Uses CRT;
Var a,b,cinteger;
Begin
Clrscr;
writeln('Nhap so thu nhat:');readln(a);
Writeln('Nhap so thu hai:);readln(b);
Writeln('Nhap so thu ba:");readln(c);
Writeln('Trung binh cong cua ba so la:",(a+b+c)/3);
Readln;
End.