Вычислить среднеарифметическое значение элементов массива.

@@ndru}{a · Регистрация: 11.04.2011

Author24 — интернет-сервис помощи студентам

Создать числовой массив А из 10 элементов.
Заполнить его и вывести на экран.
Вычислить среднеарифметическое значение элементов массива.

@KaiTheCat · 11.04.2011, 14:06

Pascal

var
  a: array[0..9] of integer;
  i,sr: integer;
Begin
  sr:=0;
  for i:=0 to 9 do
    begin
      readln(a[i]);
      sr:=sr+a[i];
    end;
  sr:=sr div 10;
  for i:=0 to 9 do write(a[i],' ');
  writeln;
  writeln('srednee=',sr);
  readln;
End.

magirus · 11.04.2011, 14:07

Комментарий модератора

@ndru}{a, называйте темы информативно

@@ndru}{a 1 / 1 / 0 Регистрация: 11.04.2011 Сообщений: 14
		1
	Вычислить среднеарифметическое значение элементов массива. 11.04.2011, 11:58. Показов 1073. Ответов 2 Метки нет (Все метки) Создать числовой массив А из 10 элементов. Заполнить его и вывести на экран. Вычислить среднеарифметическое значение элементов массива. 0

Вычислить среднеарифметическое значение элементов массива.

Решение