01.03.2009, 21:34
|
|
Познающий
Регистрация: 08.12.2008
Сообщений: 58
С нами:
9170134
Репутация:
10
|
|
Ребят спасибо , сейчас буду разбираться!
Человек просил на Паскале, а не в делфи
Я уж думал никто не заметил этих слов)))
repeat readln(mystr); Val(mystr, num_int, errorflag); if errorflag = 0 then writeln('not a number'); until (errorflag <> 0);
Попробовал сделать , этот код выводит что не число если вводишь число , и только 2 раз можно сделать ввод кода, потом вылетает(((
Можешь написать пожалуйста код маленькой проги , которая будет проверять является ли введёная строка цифрами или буквами, и если не сложно мож ещё написать код функции для использования её в программах. Хотелось бы так что пишеться name_of_function(name_of_x);
имя функции , а в ней имя переменной которой нужно считать. ТОесть эта функция должна заменять стандартный read но с проверкой! Если от меня чтото понадоиться чем смогу помогу, заранее благодарен!
Последний раз редактировалось Djezul; 01.03.2009 в 21:52..
|
|
|