Question

Напишите программу которая находит сумму чисел кратных 3 и оканчивающихся на 7

Буду очень благодарен!)

Answer 1

Ответ:

begin

 ReadSeqIntegerWhile(t->t<>0).Where(t->(t mod 7=0) and (t mod 10=3)).Sum.Println

end.

либо

i = 1

s = 0

while i != 0:

  i = int(input())

  if (i % 7 == 0) and (i % 10 ==3 ):

      s += i

print(s)

Объяснение: