Регистрация
Войти
Стать экспертом Правила
Информатика

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

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

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

Пример
2 -10 -31 39 18 -35 -24 -22 4 -31 30
k=3
67
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам