Question

Напишите программу, которая в последовательности целых чисел определяет количество двузначных чисел, кратных 8 или 5. Программа получает на вход целые числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Программа должна вывести одно число: количество нужных чисел Входные данные 20 32 400 0 Выходные данные 2

Answer 1

Ответ:

var

 n, i: integer;

begin

 readln(n);

 i := 0;

 while n <> 0 do

 begin

   if (n > 9) and (n < 100) then

     if (n mod 8 = 0) or (n mod 5 = 0) then inc(i);

   readln(n);

 end;

 writeln(i);

end.

Answer 2

Для решения этой задачи, мы можем использовать цикл, который будет считывать введенные числа до тех пор, пока не встретит число 0. Внутри цикла проверяем, является ли текущее число двузначным и кратным 8 или 5. Если это так, увеличиваем счетчик.

Вот программа на Python, которая решает эту задачу:

pythonCopy code
def count_two_digit_multiples_of_8_or_5():
    count = 0

    while True:
        num = int(input("Введите целое число (0 для окончания ввода): "))
        if num == 0:
            break

        if 10 <= num <= 99 and (num % 8 == 0 or num % 5 == 0):
            count += 1

    return count

result = count_two_digit_multiples_of_8_or_5()
print("Количество двузначных чисел, кратных 8 или 5:", result)

Вы можете запустить эту программу, и она будет просить вас ввести целые числа до тех пор, пока вы не введете 0. Затем она выведет количество двузначных чисел, которые кратны 8 или 5. Например, для входных данных "20 32 400 0", программа выведет "2".