Отыскать сумму элементов массива состоящего из натуральных чисел и найти их

Отыскать сумму частей массива состоящего из натуральных чисел и отыскать их среднее арифметическое на языке паскаль

Задать свой вопрос
1 ответ
  1. program task31152774;
  2. const
  3.  N = 10;
  4. var
  5.  arr: array[1..N] of integer;
  6.  S: real;
  7. begin
  8.  for var i := 1 to N do
  9.    begin
  10.      Readln(arr[i]);
  11.      S := S + arr[i]
  12.    end;
  13.  Writeln('СУММА Частей = ', S);
  14.  Writeln('СРЕДНЕЕ АРИФМ. = ', S / N);
  15. end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт