Как можно определить все двузначные числа, которые делятся на m или содержат цифру m, применяя язык Паскаль?

Информатика 7 класс Алгоритмы и программирование на языке Паскаль Двузначные числа деление на m цифра m язык Паскаль программирование на паскале алгоритмы Паскаль определение чисел условия делимости Новый

Для решения задачи о нахождении всех двузначных чисел, которые делятся на m или содержат цифру m, мы можем использовать язык программирования Паскаль. Давайте рассмотрим шаги, которые помогут нам написать программу для этой задачи.

1. Определение диапазона чисел:

   Двузначные числа находятся в диапазоне от 10 до 99.

2. Ввод значения m:

   Пользователь должен ввести значение m, которое будет использоваться для проверки делимости и наличия цифры.

3. Цикл для перебора двузначных чисел:

   Мы будем использовать цикл для перебора всех двузначных чисел от 10 до 99.

4. Проверка условий:

   Для каждого числа мы будем проверять два условия:

   • Делится ли число на m.
   • Содержит ли число цифру m.
5. Вывод результата:

   Если число удовлетворяет хотя бы одному из условий, мы выводим его на экран.

Теперь давайте рассмотрим пример кода на языке Паскаль:

program FindTwoDigitNumbers;
var
  m, i: integer;
  containsDigit: boolean;
begin
  write('Введите значение m (0-9): ');
  readln(m);

  if (m < 0) or (m > 9) then
  begin
    writeln('Ошибка: m должно быть в диапазоне от 0 до 9.');
    exit;
  end;

  writeln('Двузначные числа, которые делятся на ', m, ' или содержат цифру ', m, ':');

  for i := 10 to 99 do
  begin
    containsDigit := (i div 10 = m) or (i mod 10 = m);

    if (i mod m = 0) or containsDigit then
      writeln(i);
  end;
end.

В этом коде:

• Мы запрашиваем у пользователя ввод значения m.
• Проверяем, чтобы m было в допустимом диапазоне от 0 до 9.
• Используем цикл for для перебора всех двузначных чисел.
• Проверяем, делится ли текущее число на m и содержит ли цифру m.
• Если хотя бы одно из условий истинно, выводим число на экран.

Таким образом, мы можем найти все двузначные числа, которые делятся на m или содержат цифру m, используя язык Паскаль.