Question

Домашнее задание

Дана последовательность, состоящая из N чисел. Найдите сум-
му членов этой последовательности, которые делятся на к без
остатка (1<=K, N<100).

Answer 1

var k, n, a, i, s: integer;

begin

   readln(k, n);

   s := 0;

   for i:=1 to n do begin read(a); if (a mod k) = 0 then s += a; end;

   write(s);

end.

Answer 2

Ответ:

k=int(input('K: '))

n=int(input('N: '))

s=0

for i in range(n):

   c=int(input('Введите число: '))

   if c%k==0:

       s+=1

print('Сумма чисел, делящихся на k без остатка:',s)