Нужно составить программу в Pascal ABC с использованием цикла. Условие: Вычислите сумму данных N натуральных чисел. Входные данные Вводится число N, а затем N чисел, сумму которых необходимо вычислить. Выходные данные Выведите ...
Нужно составить программу в Pascal ABC с использованием цикла. Условие:
Вычислите сумму данных N натуральных чисел.
Входные данные
Вводится число N, а затем N чисел, сумму которых необходимо вычислить.
Выходные данные
Выведите единственное число - сумму введенных чисел.
Ответ(ы) на вопрос:
var
i, n, s, t: integer;
begin
Read(n);
s:=0;
for i := 1 to n do begin Read(t); s := s + t end;
Writeln(s)
end.
Не нашли ответ?
Похожие вопросы