Question

Разработать программу, подсчитывающую количество элементов кратных 5 в динамическом массиве размерности n.
~Pascal~

Answer 1

Решение представлено во вложении.

Язык: Pascal

Answer 2

##

var n := ReadInteger;

var a := ArrRandom(n, -99, 99);

a.Println;

a.Where(t -> t.Divs(5)).Count.Print