Question

Составить программу для вычисления количества чисел, кратных 7 промежутке от 10 до 80.

Answer 1

Program _1;

Var

sum, i : Integer;

Begin

sum:=0;

For i:=10to 80 do If i mod 7 = 0 then sum:=sum+i;

Writeln(sum);

end.

Answer 2

Да легко! Вот простая программа на Python:

pythonCopy code
# Инициализация переменной для хранения количества чисел, кратных 7
count = 0

# Цикл для перебора чисел в промежутке от 10 до 80
for number in range(10, 81):
    # Проверка, является ли число кратным 7
    if number % 7 == 0:
        count += 1

# Вывод результата
print(f"Количество чисел, кратных 7, в промежутке от 10 до 80: {count}")

Просто скопируйте этот код в интерпретатор Python и выполните, чтобы получить количество чисел, кратных 7, в заданном промежутке.