Задача 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.
Немає коментарів:
Дописати коментар