Question

В коментах вопрос. а хотя вот вопрос: Складі программу для знаходження всіх двоціфрових ціфр що діляться на N або містять ціфру N

Answer 1

Var
i,n:integer;
begin
 write('Write n: '); readln(n);
 for i:=10 to 99 do
  if (i mod n=0) or ((i div 10=n) or (i mod 10=n))
   then writeln(i,' ');
readln
end.

Answer 2

Для решения этой задачи можно написать программу на языке программирования, которая будет искать все двузначные числа, которые либо делятся на заданное число N, либо содержат цифру N. Вот пример программы на языке Python, которая решает эту задачу:

def find_numbers(N):
    result = []
    for num in range(10, 100):
        if num % N == 0 or str(N) in str(num):
            result.append(num)
    return result

N = int(input("Введите число N: "))
numbers = find_numbers(N)
print("Двузначные числа, которые делятся на", N, "или содержат цифру", N, ":", numbers)

Эта программа определяет функцию `find_numbers`, которая принимает число N в качестве аргумента. Внутри функции используется цикл `for`, чтобы перебрать все двузначные числа от 10 до 99. Для каждого числа проверяется, делится ли оно на N без остатка (`num % N == 0`) или содержит ли оно цифру N (`str(N) in str(num)`). Если одно из условий выполняется, число добавляется в список `result`. В конце программы выводится список найденных чисел.

Например, если вы введете число N равное 3, программа выведет следующий результат:

Двузначные числа, которые делятся на 3 или содержат цифру 3 : [12, 13, 15, 21, 23, 24, 27, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 42, 43, 45, 51, 53, 54, 57, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 72, 73, 75, 81, 83, 84, 87, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99]

Пожалуйста, уточните, если у вас есть дополнительные вопросы.