Оставить в массиве те элементы, которые не делятся ни на 2, ни на 3, ни на 5.
Массив сжать.

Спасибооо!!!

Пожалуйста

// PascalABC.NET 3.2, сборка 1356 от 04.12.2016// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;  a:=a.Where(x->(x mod 2<>0) and (x mod 3<>0) and    (x mod 5<>0)).ToArray;  a.Printlnend.Примерn= 2018 3 19 -3 40 -27 43 -1 4 -21 -12 3 -14 3 -27 37 45 11 23 -2819 43 -1 37 11 23