Tính trung bình cộng của 2 số a và b được đọc tiền tệp ‘DL.INP’ và in kết quả ra màn hình

1 câu trả lời

program tbc;
var a,b:real;
begin
assign(input,'DL.inp');reset(input);
assign(output,'DL.out');rewrite(output);
readln(a,b);
writeln('Trung binh cong = ',(a+b)/2:0:2);
close(input);close(output);
end.

Câu hỏi trong lớp Xem thêm