Тема массив. напишите на паскале программу, которая запрашивает с клавиатуры массив из n чисел, а затем выводит среднее арифметическое всех элементов массива.

171

329

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

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

linkingday

Информатика

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

vari,a,n: integer; sr: real; begin write('vvedite n = '); readln(n); // вводите количество чисел в массиве и одновременно вводите диапозон массива от 1 до n randomize; for i: =1 to n dobegina: =random(n); write(a,' '); sr: =sr+a; //значения массива складываютсяend; sr : = (sr / n); //сумма значений массива делится на количество значенийwriteln('srednee arifmeti4eskoe = ',sr: 1: 2); //выводится среднее арифметическоеreadln; end.