viết chương trình đọc 2 số nguyên (là 2 cạnh hình chữ nhật) từ tệp Tính diện tích hình chữ nhật và hiện kết quả ra màn hình
2 câu trả lời
var a,b: integer;
begin
assign(input,'HCN.INP');
reset(input);
read(a,b);
writeln('Dien tich hinh chu nhat la: ',a*b);
readln;
end.
uses crt;
var a,b: integer;
begin
clrscr;
assign(input,'HCN.INP');
reset(input);
read(a,b);
writeln('Dien tich hinh chu nhat la: ',a*b);
readln;
end.
