Câu 1.
Program p;
Uses CRT;
Const a=55; b=108;
Var trung_binh_cong:real; tong:integer;
Begin clrscr;
Tong:=a+b;trung_binh_cong:=tong/2;
Writeln('Tong :',tong);
Writeln('trung binh cong :',trung_binh_cong:0:0);
Readln end.
Câu 2 có thể liệt kê một số lỗi như đặt sai hàm const, const phải ở trên var, thiếu dấu chấm phẩy... Mà không cần vì có lỗi thì sửa luôn bài trên rồi
PS: trung bình cộng bạn có thể khai báo tên ngắn hơn cũng được, mình để thế cho bạn dễ hiểu, bạn khai báo trung binh cộng là integer cũng được vì tổng a và b là số chẵn
