Задача A + B

Знайдіть A + B.
Вхідні дані
У кожному рядку задано два цілих числа A та B (|A|, |B| ≤ 30000). Дані зчитуйте до кінця файлу.
Вихідні дані
Для кожного наведеного прикладу виведіть суму A + B у окремому рядку.


Вхідні дані
1 1
1 2
Вихідні дані
2
3



program A_AND_B;
var a,b : integer;
f1,f2 : text;
BEGIN
assign (f1,'input.txt'); reset(f1);
assign (f2,'output.txt'); rewrite(f2);
while not(eof(f1)) do begin
readln (f1,a,b);
writeln (f2,a+b);
end;
close (f1);
close (f2);

END.

Немає коментарів:

Дописати коментар