
Кондратович
5 год назад
Напишите плиз, 3 вариант!!!!Тема: Поиск элементов массива, удовлетворяющих заданному условию

ОТВЕТЫ

Адриана
Oct 24, 2020
begin
Writeln('*** Исходный массив ***');
var z:=MatrRandom(4,6,10,80);
z.Println(4); Writeln(4*z.ColCount*'-');
var t:=z.ElementsWithIndexes.MaxBy(x->x[2]);
Writeln('Максимальный элемент z[',t[0]+1,',',t[1]+1,']=',t[2])
end.
*** Исходный массив ***
47 18 64 34 29 42
68 55 80 68 44 34
15 51 43 75 32 52
21 38 36 48 58 69
------------------------
Максимальный элемент z[2,3]=80
651
Смежные вопросы: