Quảng cáo
1 câu trả lời 442
program tbtuoi;
uses crt;
var a, b :integer;
tb: real;
begin
clrscr;
write('Nhap tuoi nguoi thu nhat: ');
readln(a);
write('Nhap tuoi nguoi thu hai: ');
readln(b);
tb:= (a+b)/2;
writeln('Trung binh tuoi la :', tb:5:1);
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
86252
Gửi báo cáo thành công!
