Question

Напишите программу, которая находит в массиве количество элементов, равных заданному значению X .

Входные данные

Первая строка содержит размер массива N . Во второй строке через пробел задаются N чисел – элементы массива. В третьей строке записано число X . Гарантируется, что 0 < N ≤ 10000 .

Выходные данные

Программа должна вывести одно числа – количество элементов массива, равных X

Answer 1

// PascalABC.NET 3.4.2, сборка 1806 от 30.09.2018

// Внимание! Если программа не работает, обновите версию!

begin

 var N := ReadlnInteger;

 var a := ReadArrInteger(N);

 var X := ReadInteger;

 a.Count(t -> t = X).Println

end.