Матрица.сменить знак максимального по модулю элемента на противоположный

[Яна Николаевна]

сама задача
дана матрица А(4,6). в каждой строке сменить знак максимального по модулю элемента на противоположный.
помогите,пожалуйста,решить..

[Mad_Cat]

for i:=1 to 4 do
begin im:=1;
for j:=2 to 6 do
if abs(a[i,j])>abs(a[i,im]) then im:=j;
a[i,im]:=-a[i,im];
end;

[Яна Николаевна]

Сообщение от Mad_Cat

for i:=1 to 4 do
begin im:=1;
for j:=2 to 6 do
if abs(a[i,j])>abs(a[i,im]) then im:=j;
a[i,im]:=-a[i,im];
end;

только через abs?по-другому никак?

[Serge_Bliznykov]

только через abs?по-другому никак?

1) ну у Вас же в условии написано: " максимального по модулю элемента "
ABS() - и возвращает значение по модулю элемента!

А чем он Вам так не люб?!

Ну, если упереться, то можно, конечно, записать и без ABS - только непоянтно зачем?!!

[Mad_Cat]

только через abs?по-другому никак?

можно)
оба отрицательные; оба положительные; 1 отрицательное 2 положительное; наоборот ;==> 4 if-a и куча лишнего кода) и зачем вам такой гемор)

[Яна Николаевна]

всЁ,убедили,СПАСИБО)