Дан двумерный массив. Найти, есть ли посреди элементов массива данное число

Дан двумерный массив. Найти, есть ли посреди частей массива данное число q.
Помогите написать программку, пожалуйста. Заблаговременно спасибо :)

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3
const n=7;
begin
  Writeln('Начальный массив:');
  var a:=MatrRandom(n,n,-10,10); a.Println(6);
  var q:=ReadInteger('q = ');
  var m:=a.ElementsByRow.Where(x-gt;x=q).Count;
  if mgt;0 then writeln('YES') else writeln('NO');
end.

Пример:
Начальный массив:
     0    -1   -10     7     5     5     5
    -3     8     8    -8     4    10     0
    -2     9    -1    -4   -10    -2     2
    -9     6    10    -4     3    -5     4
    -3     9     4    -6     8    10    -2
     4    -1    -2     8     9    -8    -3
     5     6     2     5     9     3     8
q =  9
YES
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт