Giúp em với ạ .Viết chương trình :Cho mạch điện gồm 2 điện trở R1,R2 mắc nối tiếp Đọc từ tệp "DIENTRO.INP"2 số nguyên R1 và R2 (Các số ngăn cách nhau bởi dấu cách ;R1<R2).Tính điện trở tương đương của mạch Ghi kết quả ra tệp "DIENTRO.OUT". EM CATM ƠN NHIỀU
1 câu trả lời
program Hello;
var f:text;
R1, R2: longint;
begin
assign(f, 'DIENTRO.INP');
reset(f)
readln(f,R1,R2);
close(f);
assign(f, 'DIENTRO.OUT');
rewrite(f);
write(R1 + R2);
close(f)
end.