[Pascal] Tính trung bình cộng của 3 số

L

lamdetien36

Mã:
var
    a, b, c: integer;
begin
    writeln('Nhap 3 so: '); readln(a, b, c);
    writeln('TBC = ', (a + b + c) / 3 : 0 : 4);
    readln
end.
 
Top Bottom