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

Answer 2

а можно расшифровать то что вы написали для школьной программы, а то как-то не очень понятно(

Answer 3

А это зависит от школы. У нас в городе, например, многие школы именно так решают. А Вы версию Паскаля не указали, оставив её на мое усмотрение.

Answer 4

Что тут расшифровывать? Первая строка формирует массив b длино 11 элементов и заполняет его случайными числами из диапазона [-50;50]. Затем этот массив выводится на экран.

Answer 5

Вторая строка делает остальное. Отбирает по условию нужные элементы, подсчитывает их количество и выводит его.