Решить в паскале .заполнить массив состоящий из н элементов введенный пользователем в автоматическом режиме .найти среднее значение элемента массива.

179

355

Посмотреть ответы 2

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

34we523

Информатика

4,8(88 оценок)

Var a: array[1..1000]of integer; i,n,summ: integer; begin write('введите кол-во элементов'); readln(n); write('введите элементы массива'); for i: =1 to n do readln(a[i]); for i: =1 to n do summ: =summ+a[i]; writeln('среднее арифм. элементов массива=',summ/n) end.