Основы программирования на языке Turbo Pascal. Беляева И.В. - 146 стр.

UptoLike

Составители: 

146
Процедура Val
Procedure Val(S; var V; var Code: Integer);
Преобразовывает символьное представление числа S в целое или
вещественное число V. Code – код ошибки, возникающей при переводе
строки в число. Если все хорошо, то Code=0.
Пример использования:
«Безопасный» ввод данных.
При вводе информации с клавиатуры или из файла при помощи
процедур read/readln возможно возникновение ошибки времени
выполнения программы (runtime error) в результате которой выполнение
программы прерывается. Ошибка возникает в том случае, когда
обнаруживается несоответствие между типом переменной, указанной в
read/readln, и той строкой, которую этот read/readln получил для
обработки.
Например, если x – переменная целого типа, в программе она читается
таким образом: read(x), а пользователь вводит строку «два», то программа
завершит свою работу, выведя сообщение «Invalid numeric format» –
«неподходящий формат числа».
Это происходит
потому, что контроль ошибок выполняет сам Turbo
Pascal. В простых задачах это удобно, но в более или менее серьезных
задачах такое решение недопустимо. В реальных задачах все ошибки
пользователя должны обрабатываться самой программой. Средства,
обеспечивающие контроль правильности ввода, называются «защитой от
дурака». Существует несколько способов реализации этой защиты. Один
из них состоит
в следующем: весь ввод пользователя ВСЕГДА читается в
виде строк (или кодов отдельных клавиш). Затем введенные строки
анализируются. Если введена правильная строка, то программа идет
дальше, если нет, то выдается сообщение об ошибке, и данные требуют
ввести повторно.