// PascalABC.NET 3.2, сборка 1407 от 18.03.2017
// Внимание! Если программа не работает, обновите версию!
begin
Write('s=',ReadArrInteger('1:',10).Sum+ReadArrInteger('2:',10).Sum)
end.
Пример
1: 3 6 -2 5 3 7 11 8 -9 3
2: -5 8 -7 21 -19 0 13 0 11 4
s=61