Дан одномерный массив целого типа. Получить другой массив, состоящий только из чисел исходного массива, больше 10 и кратных 3, или сообщить, что таких чисел нет. Полученный массив вывести в порядке убывания элементов.

// PascalABC.NET 3.0, сборка 1088
begin
  var n:=ReadInteger(Количество элементов: );
  var a:=ArrRandom(n,1,99);
  a.PrintLn(,);
  var b:=a.Where(x->(x>10) and (x mod 3 = 0)).ToArray;
  if b.Length=0 then Writeln(Нет нужных элементов)
  else b.OrderByDescending(x->x).Println(,)
end.

Тестовое решение:
Количество элементов: 15
54,12,98,26,18,21,10,61,62,22,89,11,1,7,75
75,54,21,18,12

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку