На каком языке программирования писать решение задачи: 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;