Напишите программу которая находит сумму чисел кратных 3 и оканчивающихся на 7 Буду очень благодарен!)
126
395
Ответы на вопрос:
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)
Объяснение:
Популярно: Информатика
-
NastyaZl15.10.2020 03:25
-
happynik2002126.10.2020 02:51
-
nastylamyr299915.06.2023 08:08
-
Xylinado02.07.2021 01:16
-
jgjgjgjh30.12.2021 16:01
-
braununs06.03.2021 13:55
-
mustafaalbakov22.07.2020 04:31
-
NatyGranilace15.04.2023 16:19
-
rpppppppyuv03.04.2022 03:28
-
Lizka2285503.01.2020 00:24