program pas;
uses crt;
var f1,f2:text;
Tong,byte:integer;
begin
clrscr;
writeln(f1,'sum.inp');
reset(f);
writeln(f2,'sum.out');
rewrite(f2);
while not eof(f) do
begin
read(f1,a,b);
tong:=a+b;
writeln('tong la ',tong);
end;
close(F1);
CLOSE(F2);
READLN
END.