Как изменить знак максимального по модулю элемента массива. pascal.

kmarkechko kmarkechko    3   30.09.2019 03:30    1

Ответы
danilhgg52 danilhgg52  09.10.2020 04:30
PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), -50, 50);

 a.Println;

 var i := a.Select(t -> Abs(t)).ToArray.IndexMax;

 a[i] := -a[i];

 a.Println

end.


Как изменить знак максимального по модулю элемента массива. pascal.
ПОКАЗАТЬ ОТВЕТЫ
aleksBRO aleksBRO  09.10.2020 04:30

Решение в стиле турбо-паскаля или фрипаскаля, со статическим массивом


Как изменить знак максимального по модулю элемента массива. pascal.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика