Найти разность между максимальным и средним арифметическим элементами квадратной матрицы, заданной случайным образом

@egerepi · Регистрация: 14.11.2017

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

Нужно построить программу для такой задачи:
Найти разность между максимальным и средним арифметическим элементами квадратной матрицы, заданной случайным образом.

Для справки:
Этапы решения 2 задачи: описать переменные; сформировать массив; напечатать его; найти максимальный (минимальный) элемент; найти сумму всех элементов; найти среднее арифметическое, вычислить нужную разность; напечатать результат. Курсивом выделены циклы.

@Puporev · 03.12.2017, 18:42

так все же написано, начинай, будут вопросы по коду, спрашивай, только со своим кодом.

@egerepi · 03.12.2017, 20:44 **[ТС]**

Всё написано, да ничего не понимаю

@Puporev · 04.12.2017, 09:05

Pascal

var a:array[1..15,1..15] of real;
    n,i,j:integer;
    max,srd,rzn:real;
begin
repeat
write('Введите размер массива от 2 до 15 n=');
readln(n);
until n in [2..15];
randomize;
writeln('Массив');
srd:=0;
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    a[i,j]:=9*random;
    write(a[i,j]:5:2);
    srd:=srd+a[i,j];
    if i*j=1 then max:=a[i,j]
    else if a[i,j]>max then max:=a[i,j];
   end;
  writeln;
 end;
writeln('Максимальный элемент=',max:0:2);
writeln('Сумма=',srd:0:2);
srd:=srd/n/n;
writeln('Среднее арифметическое=',srd:0:2);
rzn:=max-srd;
writeln('Разность между максимальным и средним арифметическим=',rzn:0:2);
end.

@egerepi 0 / 0 / 0 Регистрация: 14.11.2017 Сообщений: 6
		1
	Найти разность между максимальным и средним арифметическим элементами квадратной матрицы, заданной случайным образом 03.12.2017, 18:40. Показов 2642. Ответов 3 Метки нет (Все метки) Нужно построить программу для такой задачи: Найти разность между максимальным и средним арифметическим элементами квадратной матрицы, заданной случайным образом. Для справки: Этапы решения 2 задачи: описать переменные; сформировать массив; напечатать его; найти максимальный (минимальный) элемент; найти сумму всех элементов; найти среднее арифметическое, вычислить нужную разность; напечатать результат. Курсивом выделены циклы. 0

@Puporev Почетный модератор 64299 / 47594 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	03.12.2017, 18:42	2
	так все же написано, начинай, будут вопросы по коду, спрашивай, только со своим кодом. 0

@egerepi 0 / 0 / 0 Регистрация: 14.11.2017 Сообщений: 6
	03.12.2017, 20:44 [ТС]	3
	Всё написано, да ничего не понимаю 0

	04.12.2017, 09:05

Опции темы

Найти разность между максимальным и средним арифметическим элементами квадратной матрицы, заданной случайным образом

Решение