Question

Напишите программу, которая в последовательности натуральных чисел определяет количество всех  чисел, кратных 5. Программа получает на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 — признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести одно число: количество всех чётных чисел, кратных 5.​

Answer 1

Ответ:

var

n, k, i, a: Integer;

begin

 n:=1000;

 k:=0;

 for i := 1 to 1000 do  

 begin

readln(a);

if a = 0 then

begin

 break;

end;

if (a <= 30000) and (a>0) and (a mod 5 = 0) then begin

   k:=k+1;

end;

end;

writeln(k);

end.

Answer 2

Конечно! Вот пример программы на языке Python, которая решает данную задачу:

pythonCopy code
count = 0  # Переменная для подсчета количества чисел, кратных 5

while True:
    num = int(input("Введите число: "))
    
    if num == 0:
        break  # Прерываем цикл, если введено число 0
    
    if num % 5 == 0:
        count += 1  # Увеличиваем счетчик, если число кратно 5

print("Количество чисел, кратных 5:", count)

Программа запрашивает числа у пользователя до тех пор, пока не будет введено число 0. Затем она проверяет каждое введенное число и увеличивает счетчик, если число кратно 5. Наконец, программа выводит количество чисел, кратных 5.

Обратите внимание, что данная программа предполагает корректный ввод со стороны пользователя, то есть только натуральные числа. Если введено некорректное значение, программа может вызвать ошибку.