Дан массив А(10). Определить наибольший по модулю элемент массива и его номер.
Дан массив А(10). Определить наибольший по модулю элемент массива и его номер.
Гость
Ответ(ы) на вопрос:
Гость // PascalABC.NET 3.1, сборка 1213 от 04.04.2016
begin
var a:=ArrRandom(10,-100,100); a.Println;
var i:=a.Select(x->abs(x)).ToArray.IndexMax;
Writeln('Максимальный по модулю А[',i+1,']=',a[i])
end.
Тестовое решение:
-55 -41 -67 -5 -52 6 -95 -93 -6 -45
Максимальный по модулю А[7]=-95
Не нашли ответ?
Похожие вопросы