Question

Ребят, очень нужна помощь С клавиатуры вводятся натуральные числа.Конец ввода чисел–0,в подсчетколичества не входит.Вычислить и вывести на экран количество чисел,кратных 7. ​

Answer 1

var

   a, n : integer;

begin

   repeat

       read(a);

       if a div 7 = 0 then n += 1;

   until a = 0;

   writeln(n);

end.

Answer 2

Привет! Я могу помочь написать программу на языке программирования, которая будет выполнять указанную задачу. Ниже представлен пример кода на языке Python:

pythonCopy code
count = 0 # инициализируем переменную для подсчета количества чисел, кратных 7
num = int(input("Введите число: ")) # запрашиваем у пользователя первое число

while num != 0: # продолжаем цикл, пока пользователь не введет число 0
    if num % 7 == 0: # проверяем, делится ли число на 7 без остатка
        count += 1 # если да, увеличиваем счетчик на 1
    num = int(input("Введите число: ")) # запрашиваем у пользователя следующее число

print("Количество чисел, кратных 7: ", count) # выводим на экран количество чисел, кратных 7

Программа работает следующим образом:

1. Инициализируется переменная count для подсчета количества чисел, кратных 7, и запрашивается у пользователя первое число.
2. Запускается цикл while, который продолжается, пока пользователь не введет число 0.
3. Внутри цикла проверяется, делится ли текущее число на 7 без остатка. Если да, то переменная count увеличивается на 1.
4. Запрашивается у пользователя следующее число.
5. После того, как пользователь ввел число 0, программа выводит на экран количество чисел, кратных 7.

Надеюсь, это поможет! Если у тебя есть какие-то дополнительные вопросы, не стесняйся задавать!