Viết chương trình đọc dữ liệu từ tệp "INPUT.TXT" gồm 2 số a nguyên và b nguyên dương. Tính tổng 2 số đó và ghi kết quả ra tệp "OUT.TXT". Bạn nào giúp mình với ạ!!

2 câu trả lời

var f1, f2: text;

      a, b: word;

Begin

    Assign(f1, 'INPUT.TXT'); reset(f1);

    Assign(f2, 'OUT.TXT'); rewrite(f2);

    Read(f1, a, b); 

    Write(f2, a+b); close(f2);

End.

program tong_tep;

var f,g:text;

      a,b:integer;

begin

       Assign(f,'INPUT.TXT');   reset(f);

       Assign(g,'OUT.TXT');   rewrite(g);

       read(f,a,b);

       write(g,a+b);

       close(f);  close(g);

end.

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