Вычислите сумму данных N натуральных чисел. Входные данные Вводится число N, а затем N чисел, сумму которых необходимо вычислить. Выходные данные Выведите единственное число - сумму введенных чисел. В Pascal ABC

program sum;

var N, b, s: integer;

/ / N - количество чисел, b - число, s - сумма введенных чисел.

begin

writeln ('Введите количество чисел');

readln (n);

writeln ('Введите числа ');

s: = 0;

for i:integer:=1 to N do

begin

readln (b);

s: = s + b;

end;

Writeln ('Сумма введенных чисел: ', s)

end.