
Родион
5 год назад
Создать одномерный массив из 16 элементов. Вычислить максимальное значение из элементов, имеющих четные индексы.
ОТВЕТЫ

Miron
Oct 24, 2020
// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ArrRandom(16);a.Println;
Writeln(a.Where((v,i) -> (i+1).isEven).Max);
end.
98 88 1 68 45 8 66 97 67 23 94 49 22 83 16 93
97
// Внимание! Если программа не работает, обновите версию!
begin
var a:= ArrRandom(16);a.Println;
Writeln(a.Where((v,i) -> (i+1).isEven).Max);
end.
98 88 1 68 45 8 66 97 67 23 94 49 22 83 16 93
97
873
Смежные вопросы: