Процедура Val строкого типа, Не работает справка в object pаscаl,Что из себя представляет процедура |
1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!
Процедура Val строкого типа, Не работает справка в object pаscаl,Что из себя представляет процедура |
Anches |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 12 Пол: Женский Реальное имя: Anna Репутация: 0 |
Надо срочно!
|
Айра |
Сообщение
#2
|
Профи Группа: Пользователи Сообщений: 731 Пол: Женский Репутация: 25 |
Val(st,IBR,Cod) - преобразует значение st в величину целочисленного или вещественного типа и помещает результат в IBR. Значение st не должно содержать незначащих пробелов в начале и в конце. Code - целочисленная переменная, которая если нет ошибки в операции преобразования равна нулю, а если она есть (например, если литерное значение переводится в цифровое), то Cod будет содержать номер позиции первого ошибочного символа, а значение IBR не будет определено.
Например: значение st : '1450' val(st,IBR,cod) IBR=1450, cod=0; значение st : '14f0' val(st,IBR,cod) IBR-неопределено, потому что вместо цифры в третьей позиции стоит буква, cod=3. Сообщение отредактировано: Айра - |
volvo |
Сообщение
#3
|
Гость |
Самое главное - не забывать, что Val не диагностирует переполнения!!! Т.е. при вызове:
varErr будет содержать 0, несмотря на это результат в i не будет равен 40000... |
klem4 |
Сообщение
#4
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
Цитата Не работает справка в object pаscаl,Что из себя представляет процедура В следующий раз пользуйся поиском и смотри FAQ Стандартные функции Паскаля для работы со строками и символами -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 16.10.2024 7:26 |