Nhập vào 4 số nguyên a,b,c,d . Tính trung bình cộng của 4 số. Hãy viết chương trình.

2 câu trả lời

Program baitap;

Uses crt;

Var a,b,c,d:integer;

Begin

Clrscr;

Write('Nhap lan luot 4 so a b c d:'); Readln(a,b,c,d);

Writeln('Trung binh cong:',(a+b+c+d)/4:5:2);

Readln

End.