1.Viết chương trình nhập và tính tổng 2 số nguyên, giá trị được lưu vào tệp songuyen.txt. 2. Viết chương trình hiển thị trên màn hình giá trị 2 số nguyên và tổng của chúng ở bài 1.

1 câu trả lời

Bài 1:

program bai_giai;
uses crt;
var f:text;
    a,b,t:integer;
begin
    clrscr;
    Assign(f,'songuyen.txt');  rewrite(f);
    readln(a,b);
    t:=a+b;
    write(f,a,' ',b,' 't);
    close(f);
end.

Bài 2:

program bai_giai;
uses crt;
var f:text;
    a,b,t:integer;
begin
    clrscr;
    Assign(f,'songuyen.txt');  reset(f);
    readln(f,a,b);
    t:=a+b;
    write(a,' ',b,' ',t);
    close(f);  readln;
end.