Question

ПАСКАЛЬ МАССИВ СОСТАВИТЬ ПРОГРАММУ Имеется массив В11 из целых чисел. найти количество элементов массива, больших числа 2 и кратных 3

Answer 1

// PascalABC.NET 3.2, сборка 1353 от 27.11.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var b:=ArrRandom(11,-50,50); b.Println;
  Writeln('k=',b.Where(x->(x>2) and (x mod 3=0)).Count)
end.

Пример
2 -10 -31 39 18 -35 -24 -22 4 -31 30
k=3