[54545454]

Элементы матрицы С, которые крупнее 5, уменьшить на 2, отрицательные элементы матрицы взять по модулю. Вывести элементы начальной и преобразованной матрицы.

[Vladimr]

На каком языке программирования писать решение задачи: Delphi 7 (как указанно в вашем профиле) или на С/С++ (как выбрана ветка задания вопроса)?

Также не понятно имеем ли мы дело с массивом(Как указанно в заголовке) или с матрицей (как указанно в тексте задания). Не указана размерность массива элементов С. Также не понятно отрицательные значения взять по модулю? Или модуль отрицательных чисел сравнить с 5 и если больше то вычесть 2?

Как пример решения на Delphi 7

Код:

const n=100;m=100; //размерность матрицы

var
c:array [1..n,1..m] of real; //первоначальный матрицы
d:array [1..n,1..m] of real; //преобразованный матрицы

i,j:integer; //для цикла
s:string; //для вывода массива
begin
//ввод значений в матрицу С напишите сами

  for i := 1 to n do
    for j := 1 to m do
      if abc(c[i,j])>5 then //модуль числа
       d[i,j]:=c[i,j]-2 else d[i,j]:=c[i,j];


     writeln('Оригинальная матрица');
  for i := 1 to n do //вывод матрицы С
   begin
    s:='';
    for j := 1 to m do s:=s+' '+floattostr(c[i,j]); //записываем элементы строки матрицы
     writeln(s); //вывод на экран строки массива
   end;

     writeln('Изменённая матрица');
  for i := 1 to n do //вывод изменённой матрицы
   begin
    s:='';
    for j := 1 to m do s:=s+' '+floattostr(d[i,j]); //записываем элементы строки матрицы
     writeln(s); //вывод на экран строки массива
   end;
end;