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)

Объяснение:

Answer 2

Конечно, вот пример программы на Python, которая находит сумму чисел, кратных 3 и оканчивающихся на 7 в заданном диапазоне:

pythonCopy code
# Запрашиваем начало и конец диапазона
начало = int(input("Введите начало диапазона: "))
конец = int(input("Введите конец диапазона: "))

# Инициализируем переменную для хранения суммы
сумма = 0

# Проходим по числам в заданном диапазоне
for число in range(начало, конец + 1):
    # Проверяем, кратно ли число 3 и оканчивается ли оно на 7
    if число % 3 == 0 and str(число)[-1] == '7':
        сумма += число

# Выводим результат
print("Сумма чисел, кратных 3 и оканчивающихся на 7:", сумма)

Вы можете запустить эту программу, введя начало и конец диапазона, и она вернет вам сумму чисел, удовлетворяющих условиям.