Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Здесь нужно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 26.10.2019, 16:53   #11
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,225
По умолчанию

Цитата:
Сообщение от tara-ta-ta Посмотреть сообщение
if s[1]='-' then
и прежде чем обращаться к первому элементу строки нужно проверить, что длина строки как минимум больше нуля!

а в вашем случае можно смело проверять длину строки на >=4 ("-Ч.Ч")
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 26.10.2019, 20:01   #12
digitalis
Участник клуба
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 1,865
По умолчанию

У нас в деревне делали так:
Код:
          if (Ord(stro[i]) < $30 ) or (Ord(stro[i]) > $39 ) then  // не годится...
digitalis вне форума   Ответить с цитированием
Старый 26.10.2019, 20:07   #13
Serge_Bliznykov
МегаМодератор
СуперМодератор
 
Регистрация: 09.01.2008
Сообщений: 26,225
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
У нас в деревне делали так:
Зачем у вас в деревне так издевались над собой и над компилятором?
Паскаль прекрасно умеет сравнивать символьные значения:
Код:
if (stro[i] < '0') or (stro[i] > '9') then  // не годится...
Serge_Bliznykov вне форума   Ответить с цитированием
Старый 26.10.2019, 22:08   #14
digitalis
Участник клуба
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 1,865
По умолчанию

Дык это... для надёжности. Вдруг попадется Паскаль, который не умеет
digitalis вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Стек: Проверить, является ли содержимое текстового файла Т правильной записью формулы заданного вида. JoYeRsOl Помощь студентам 1 15.10.2019 17:46
Паскаль: является ли введенная с клавиатуры последовательность символов записью двоичного или шестнадцатеричного числа Студент ММИ Помощь студентам 12 14.11.2014 15:22
Написать программу, которая проверяет, является ли введенная с клавиатуры строка дробным числом. (язык C) Степан Симаков Помощь студентам 3 01.04.2014 23:10
Является ли заданная строка правильной записью вещественного числа с возможным знаком и десятичной точкой Banny Паскаль, Turbo Pascal, PascalABC.NET 7 18.12.2008 23:28
Определить, является ли заданная строка правильной записью вещественного числа Sergik1977 Паскаль, Turbo Pascal, PascalABC.NET 2 18.10.2007 16:53


05:33.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.