Необходимо составить программу в Pascal ABC с внедрением цикла. Условие:Вычислите сумму

Необходимо составить программку в Pascal ABC с внедрением цикла. Условие:
Вычислите сумму данных N естественных чисел.
Входные данные
Вводится число N, а потом N чисел, сумму которых нужно вычислить.

Выходные данные
Выведите единственное число - сумму введенных чисел.

Задать свой вопрос
1 ответ
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.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт