Question

ПАСКАЛЬ!! СРОЧНО!!
Напишите программу, которая в последовательности натуральных чисел определяет количество чисел, оканчивающихся на 0. Программа должна вывести одно число – количество чисел, оканчивающихся на 0.

Answer 1

// PascalABC.NET

begin

 var n := ReadInteger('n =');

 var a := ArrRandom(n, 1, 1000);

 a.Println;

 a.Count(p -> p mod 10 = 0).Print

end.