B1: nhập a,b,c.
B2: TB=(a+b+c)/3
B3: in kết quả ra màn hình
var a,b,c: integer;
TB: real;
begin
write ('nhap vao so a=');readln(a);
write ('nhap vao so b=');readln(b);
write ('nhap vao so c=');readln(c);
TB:=(a+b+c)/3;
write ('trung binh cong của 3 so nguyen a,b,c:',TB);
readln;
end.