Информатика, вопрос задал RoolsenGun , 7 лет назад

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

Ответы на вопрос

Ответил thedomidy
0
  1. program task31152710;
  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.
Ответил Артур998
0
Помогите пожалуйста с информатикой 50 баллов https://znanija.com/task/31152871
Новые вопросы