Viết chương trình tính trung bình cộng của bốn số a,b,c,d. Với a,b,c,d được nhập từ bàn phím (Pascal) Giúp mình với! Hic...hic...😩😩

Program Trung_binh_cong;

uses crt;

Var T,a,b,c,d:real;

Begin

clrscr;

Writeln('Nhap bon so can tinh trung binh cong:');readln(a,b,c,d);

T:=(a+b+c+d)/4;

Writeln('Trung binh cong la:',T:10;2);

readln;

End.