Получить квадратную матрицу путем вычитания из элементов исходной матрицы минимального элемента

@Дмтрий · Регистрация: 24.06.2015

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

В данной действительной квадратной матрице порядка N найти наибольший по модулю элемент. Получить новую квадратную матрицу путем вычитания из элементов исходной матрицы найденного минимального элемента. Исходный и скорректированный массивы вывести на экран.

@ildwine · 25.06.2015, 09:45

Pascal

const n = 5;
var
  matrix : array [1.. n, 1..n] of integer;
  i, j, max : integer;
begin
  randomize;
  max := - 1;
  writeln('исходная матрица:');
  for i := 1 to n do
  begin
    for j := 1 to n do
    begin
      matrix[i,j] := random(1000) - 500;
      write(matrix[i,j]:5);
      if abs(matrix[i,j]) > max then max := matrix[i,j] 
    end;
    writeln
  end;
  writeln('новая матрица:');
  for i := 1 to n do
  begin
    for j := 1 to n do
    begin
      matrix[i,j] := matrix[i,j] - max;
      write(matrix[i,j]:5)
    end;
    writeln
  end;
  readln
end.

@Дмтрий 0 / 0 / 0 Регистрация: 24.06.2015 Сообщений: 22
		1
	Получить квадратную матрицу путем вычитания из элементов исходной матрицы минимального элемента 24.06.2015, 22:48. Показов 1393. Ответов 1 Метки нет (Все метки) В данной действительной квадратной матрице порядка N найти наибольший по модулю элемент. Получить новую квадратную матрицу путем вычитания из элементов исходной матрицы найденного минимального элемента. Исходный и скорректированный массивы вывести на экран. 0

	25.06.2015, 09:45

Получить квадратную матрицу путем вычитания из элементов исходной матрицы минимального элемента

Решение