Viết chương trình nhập vào 3 số nguyên tính và đưa ra tổng ,trung bình cộng của 3 số r trình bày cách lm

1 câu trả lời

Program trung_binh_cong;

uses crt;

var a,b,c: real;

begin

clrscr;

write('nhap so a , b , c =' ,); readln(a,b,c):

writeln('trung binh cong cua 3 so = ' ,(a+b+c) / 3);

readln;

end.