70

Помогите с программой…

tookis 16 марта 2023

Помогите с программой, запросить последовательность n чисел и найти их сумму.

категория: информатика

46

var sum, i, a, n: longint; begin readln (n); for i: =1 to n do begin read (a); inc (sum, a); end; writeln (sum); end.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...