Напишите блок-схему и программу на Паскале. Введите с клавиатуры символьную строку и определите, является

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

Инструкция:
Восьмеричная система счисления - это позиционная система, в которой числа представляются с использованием 8 цифр от 0 до 7. Чтобы определить, является ли строка правильной записью числа в восьмеричной системе счисления, мы должны проверить, что она состоит только из цифр от 0 до 7.

Блок-схема для этой задачи может выглядеть следующим образом:

начало

ввести строку

для каждого символа в строке выполнить:

    если символ не принадлежит множеству {0, 1, 2, 3, 4, 5, 6, 7}:

        вывести "Неправильная запись числа в восьмеричной системе счисления"

        завершить программу

вывести "Правильная запись числа в восьмеричной системе счисления"

конец

Программа на Паскале, реализующая эту задачу, может выглядеть так:

pascal

program ПроверкаПравильнойЗаписиОсм;



var

  число: string;

  символ: char;

  правильно: boolean;



begin

  writeln('Введите строку:');

  readln(число);

  правильно := true;

  

  for символ in число do

  begin

    if not (символ in ['0'..'7']) then

    begin

      writeln('Неправильная запись числа в восьмеричной системе счисления');

      правильно := false;

      break;

    end;

  end;

  

  if правильно then

    writeln('Правильная запись числа в восьмеричной системе счисления');

end.

Пример использования:

Введите строку:

173

Правильная запись числа в восьмеричной системе счисления

Совет:
Для понимания основ восьмеричной системы счисления, можно представить ее как расширение двоичной системы счисления, где каждая цифра восьмеричного числа соответствует блоку из трех двоичных цифр. Например, число `173` в восьмеричной системе может быть представлено как `111 011`, где каждая группа из трех цифр соответствует каждой цифре восьмеричного числа.

Практика:
Введите строку, чтобы проверить, является ли она правильной записью числа в восьмеричной системе счисления.