Предмет:
ИнформатикаАвтор:
leonard38begin
Writeln('*** Исходный массив ***');
var a := MatrRandom(5, 4, -5, 12);
a.Println(4);
Writeln('*** Полученный массив ***');
for var i := 0 to a.RowCount - 2 do
begin
var j := a.Row(i).IndexMin;
a[i, j] := -a[i, j]
end;
a.Println(4)
end.
Автор:
jovannimataДобавить свой ответ
Предмет:
МатематикаАвтор:
coalburtonОтветов:
Смотреть
Предмет:
Русский языкАвтор:
pyschoiqrzОтветов:
Смотреть
Предмет:
ФизикаАвтор:
coke zerordhqОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
alainaОтветов:
Смотреть