Напишите программу, которая считает сумму элементов массива целых чисел. Сначала задается целое число N = размер массива (он всегда меньше или равен 10), затем N целых чисел, каждая на отдельной строке. Ввод вывод (readln, writeln). Вывести сумму.
Пример ввод
3
1
2
3
Вывод
6
Напишите программу, которая считает сумму элементов массива целых чисел. Сначала задается целое число N = размер массива (он всегда меньше или равен 10), затем N целых чисел, каждая на отдельной строке. Ввод вывод (readln, writeln). Вывести сумму.
Пример ввод
3
1
2
3
Вывод
6
Пример ввод
3
1
2
3
Вывод
6
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program SumOfArrayElements;
var
N, i, sum, num: integer;
begin
sum := 0;
readln(N);
for i := 1 to N do
begin
readln(num);
sum := sum + num;
end;
writeln(sum);
end.