Question

Написать программу которая среди введённых чисел ищет и считает числа кратные 5 )помогите пожалуйста))

Answer 1

Var i,n,a,b,s:integer;

begin

writeln('Введите количество чисел в последовательности');

readln(n);

for i:=1 to n do begin

writeln('Введите число номер ', i); read(b);

if b mod 5 = 0 then 

s:=s+1;

end;

writeln('Чисел кратных 5:',s);

end.

Answer 2

Конечно, я могу помочь вам написать программу, которая ищет и считает числа, кратные 5, среди введенных чисел. Вот простой пример на языке программирования Python:

def count_multiples_of_five(numbers):
    count = 0

for num in numbers:
        if num % 5 == 0:
            count += 1

return count

user_input = input("Введите числа через пробел: ")
numbers = list(map(int, user_input.split()))

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

В этой программе мы сначала определяем функцию `count_multiples_of_five`, которая принимает список чисел в качестве аргумента и возвращает количество чисел, кратных 5. Затем мы запрашиваем у пользователя ввод чисел через пробел, разбиваем их на список и вызываем функцию `count_multiples_of_five` с этим списком. Результат выводится на экран.

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