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.

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