tính trung bình cộng rồi in ra màn hình của bốn số a, b, c, d với các số a, b, c, d là các số nguyên được nhập từ bàn phím
2 câu trả lời
program tbc;
uses crt;
var a, b, c , d : integer;
tb : real;
begin
clrscr;
write(' nhap so a :'); readln(a);
write(' nhap so b :'); readln(b);
write(' nhap so c :'); readln(c);
write(' nhap so d :'); readln(d);
tb := (a + b + c +d) /4;
writeln(' trung binh cong cua cac so la : ', tb:8:2);
readln
end.
var a, b, c, d: longint;
begin
readln(a, b, c, d);
writeln('Trung bình cộng các số: ', (a + b + c + d)/4);
end.
Câu hỏi trong lớp
Xem thêm
