Дан массив целых чисел B(40). Составить программу для вычисления количества элементов массива, которые кратны 5 .​

                                     PascalABC.NET                                      

С ручным заполнением:

begin Print('Количество:', ReadArrInteger(40).Count(x->x mod 5 = 0) );end.

С рандомным заполнением:

beginvar b := ArrRandom(40,0,100); b.Println; Print('Количество:', b.Count(x->x mod 5 = 0) );end.

Пример работы: