Реализация защиты ввода от дурака - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Доброго времени суток! Имеется тривиальная программа
И необходимо реализовать защиту от юзера - дурака, который в байтовую переменную попытается забить что-то вроде 999999999999 или пишет вместо циферок буковки\значки. При этом прога должна не упасть с ошибкой и послать юзера в лес предложить ввести нормальное значение.

Решение задачи: «Реализация защиты ввода от дурака»

textual
Листинг программы
var
  a: byte;
  error: boolean;
 
begin
  repeat
    error := false;
    try
      Readln(a);
    except
      error := true;
      writeln('Вводим значения 0 .. 255');
    end;
  until not error;
  // ...
end.

Объяснение кода листинга программы

  1. Объявлены две переменные: a типа byte и error типа boolean.
  2. Запускается цикл repeat-until, который будет выполняться до тех пор, пока error не станет равным false.
  3. Внутри цикла устанавливается значение error в false.
  4. В блоке try выполняется операция чтения значения с помощью Readln(a).
  5. В блоке except перехватывается исключение, которое возникает при неверном вводе значения.
  6. Значение error устанавливается в true, а в консоль выводится сообщение Вводим значения 0 .. 255.
  7. После выхода из блока try-except проверяется значение error. Если оно равно true, то цикл повторяется. Если false, то цикл завершается.
  8. Код, который должен выполняться после цикла, помещен в комментарий // ....

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 3.667 из 5
Похожие ответы