Регистрация
Аdrian
16.11.2020 05:57
Информатика
Есть ответ 👍

решить задания по информатике

263
411
Посмотреть ответы 1

Ответы на вопрос:

Galerina
Galerina
4,6(5 оценок)

begin

 var a := MatrRandom(5, 5, -10, 10);

 a.Println;

 var k :=

     a.Rows  // выбрать строки

     .Select(row -> row.Count(p -> p < 0))  // кол-во отриц.

     .ToArray  // записать в массив

     .IndexMax; // найти индекс максимального значения

 Print('Максимум отрицательных в строке номер', k + 1)    

end.

Популярно: Информатика