Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.12;
Скачать: CL | DM;

Вниз

Как проверить правильность ввода чисел в Pascale   Найти похожие ветки 

 
ruslan_as ©   (2003-12-02 16:08) [0]

Тут ребята контрольные сдают... да поспешили (раньше всех). Теперь препод хочет, что бы при вводе числовых значений шла проверка на "корректность ввода". Если вводишь не число то ...
А вот как проверить что ввелось не число? В Delphi я бы уже решил, а тут Pascal.
Помогите - если не трудно.


 
Agent13   (2003-12-02 16:15) [1]

В Паскале есть процедура перевода строки в число Val(S: string; R: Real; Code: Integer); или что-то вроде этого. Если введено не число, то Code будет число, отличное от нуля.


 
MBo ©   (2003-12-02 16:16) [2]

Между прочим, Borland еще в Паскале предоставил великую возможность нажимать F1 на слове ReadLn.
Честно говоря, для обеспечения возможности неправильного ввода надо сильно постараться...


 
ЮрийК ©   (2003-12-02 16:22) [3]

if (ch < "0") and (ch > "9") then // этот символ не правильно введён, не является цифрой, входящей в число


 
closer ©   (2003-12-02 16:23) [4]

>Честно говоря, для обеспечения возможности неправильного ввода надо сильно постараться...
Ты видно неразу не сдавал лабы по программированию... :)
А вот для обеспечения правильного ввода на TP 7.0 действительно надо постараться...

ReadLn недаёт никакой гарантии что введены данные в правильном формате.


 
Agent13   (2003-12-02 16:30) [5]

Если речь идёт о Readln, то проверку ввода можно осуществить также функцией IOResult.


 
TUser ©   (2003-12-02 17:56) [6]


> ReadLn недаёт никакой гарантии что введены данные в правильном формате.

Дает он такую возможность - просто читать надо в переменную соотвествующего типа. Так что правильно тут говорят - надо постараться обуспечить возможность некорректного ввода.
А вообще - зачем тебе ТР в третьем тысячилетии.



Страницы: 1 вся ветка

Текущий архив: 2003.12.12;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
7-36878
Anonimus
2003-10-08 10:42
2003.12.12
Удаление иконки из трея


6-36784
red
2003-10-15 02:36
2003.12.12
послать sms idhttp


1-36651
g-l-u-k
2003-11-23 18:36
2003.12.12
DsgnIntf - не найден


4-36907
SH
2003-10-20 14:06
2003.12.12
onPaint в TListView


1-36593
GreySerg
2003-12-01 18:20
2003.12.12
Как получить доступ к свойствам объекта , у которого есть PopupM