Question

Напишите программу, которая получает поток (последовательность) чисел (поочередный ввод с клавиатуры). Признаком окончания потока чисел является ввод числа 0. В этой последовательности определить количество чисел, которые кратны 3 и их запись оканчивается на 6. ОЧЕНЬ СРОЧНО 30Б

Answer 1

Ответ:

• var i, n: integer;
• begin
• i := 1;
• while i <> 0 do
• begin
• read(i);
• if (i mod 3 = 0) and (i mod 10 = 6) then n := n + 1;
• end;
• write(n);
• end.

Пример работы:

Answer 2

Конечно, вот программа на Python, которая делает то, что вы описали:

pythonCopy code
count = 0  # Счетчик чисел, которые кратны 3 и оканчиваются на 6

while True:
    num = int(input("Введите число (для завершения введите 0): "))
    
    if num == 0:
        break  # Завершаем ввод, если введено 0
    
    if num % 3 == 0 and num % 10 == 6:
        count += 1

print(f"Количество чисел, кратных 3 и оканчивающихся на 6: {count}")

Скопируйте этот код в файл с расширением .py и запустите его в интерпретаторе Python. Программа будет запрашивать ввод чисел до тех пор, пока не будет введено 0, и подсчитывать количество чисел, которые соответствуют вашему условию.