Нужно составить программу в Pascal ABC с использованием цикла. Условие:
Вычислите сумму данных N натуральных чисел.
Входные данные
Вводится число N, а затем N чисел, сумму которых необходимо вычислить.
Выходные данные
Выведите единственное число - сумму введенных чисел.
Ответы
Ответ дал:
2
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.
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.
Вас заинтересует
10 месяцев назад
10 месяцев назад
1 год назад
6 лет назад