Дан массив из N элементов. Определить сумму элементов, которые краты 5

ответ: Python

a=[]                              # Пусть данный массив лежит в переменной а

s=0                                  # Объявление переменной суммы

for i in range(len(N)):    # перебор индексов (от 0 до кол-ва

                                                                         элементов N)

    if a[i] %5 == 0:           # Проверяем на кратность пяти

         s=s+a[i]                 # Прибавляем к сумме каждый элемент

print(s)                           # Печатаем сумму

Объяснение:

PascalABC.NET

#Решение 1. Массив генерируется случайно

begin

 var A := ArrRandom(ReadInteger('N = '));

 A.Where(x -> x mod 5 = 0).Sum.Println;

end.

#Решение 2. Массив вводится с клавиатуры юзером

begin

 var A := ReadArrInteger('Enter array: ', ReadInteger('N = '));

 A.Where(x -> x mod 5 = 0).Sum.Println;

end.