Главная страница
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.024 c
1-36758
AndreySoft
2003-11-30 15:35
2003.12.12
BuilderToDelphi


3-36542
Fants
2003-11-19 14:52
2003.12.12
BLOB, Jpeg, FireBird, FIBPLus


7-36862
RS19
2003-10-05 18:23
2003.12.12
Нестандартная работа с LPT


1-36695
alex_M
2003-12-02 18:09
2003.12.12
Есть 2 TListView, как определить какое из них активно.


4-36905
Duncann
2003-10-21 11:57
2003.12.12
Как правильно передать параметры в функцию длл?