Question

Язык программирования - паскаль
Составьте программу, которая в одномерном массиве размерностью 12 (элементы массива случайные числа из промежутка от 0 до 6) находит количество элементов равных 3. Оформите вывод элементов на экран в строчку, количество искомых элементов на следующей строке.

Answer 1

// PascalABC.NET

begin

 var a := ArrRandom(12, 0, 6);

 a.Println.Count(p -> p = 3).Print

end.