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.

Const Fi='Songuyen.TXT';
Var f: text;
    a,b: longint;
Begin
        Assign(f,Fi); Reset(f);
        Read(f,a,b);
        Writeln(a,' ',b);
        Write(a+b);
        Readln
End.

1.

uses crt;
var f:text; a,b:longint;
begin 
clrscr;
   write('Nhap hai so nguyen: ');readln(a,b);
   assign(f,'songuyen.txt');rewrite(f);
      writeln(f,a+b);
   close(f); 
readln
end.

2.

uses crt;
var f:text; a,b:longint;
begin 
clrscr;
   write('Nhap hai so nguyen: ');readln(a,b);
   writeln(a,'+',b,'=',a+b);
readln
end.