Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 07.04.2014, 00:51   #1
FleXik
Форумчанин
 
Регистрация: 01.11.2012
Сообщений: 770
Вопрос Если число подходит под заданный интервал - выводим в Memo, если нет - берем следующее

Если число подходит под заданный интервал - выводим в Memo, если нет - берем следующее

Вобщем не пойму как реализовать, интервал от 1 до 9, числа разные (они парсятся изначально)
FleXik вне форума Ответить с цитированием
Старый 07.04.2014, 01:09   #2
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

Код:
if (a >= 1) and (a <= 9) then Memo1.lines.add(inttostr(a));
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 07.04.2014, 01:23   #3
FleXik
Форумчанин
 
Регистрация: 01.11.2012
Сообщений: 770
По умолчанию

BDA, спасибо большое, что-то не подумал что можно так переменную использовать (два раза)...
FleXik вне форума Ответить с цитированием
Старый 07.04.2014, 01:46   #4
XE5
Заблокирован
 
Регистрация: 02.03.2014
Сообщений: 439
По умолчанию

Цитата:
Сообщение от BDA Посмотреть сообщение
if (a >= 1) and (a <= 9) then
if a in [1..9] then
XE5 вне форума Ответить с цитированием
Старый 07.04.2014, 02:24   #5
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

XE5, только стоит сделать оговорку, что таким образом можно задавать интервалы строго из интервала [0..255]. Также, можно отметить, что таким способом можно задать сразу несколько интервалов, например, [0..5, 50..60]
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 07.04.2014, 02:44   #6
northener
ПШП
Участник клуба
 
Регистрация: 15.07.2013
Сообщений: 1,859
По умолчанию

Цитата:
что-то не подумал что можно так переменную использовать (два раза)...
Просто нет слов.
northener вне форума Ответить с цитированием
Старый 07.04.2014, 02:52   #7
XE5
Заблокирован
 
Регистрация: 02.03.2014
Сообщений: 439
По умолчанию

BDA Совершенно верно, но так как интервал определён числами 1..9, то условие срабатывает, и предложенный мной вариант имеет полное право на жизнь.
XE5 вне форума Ответить с цитированием
Старый 07.04.2014, 03:07   #8
BDA
МегаМодератор
СуперМодератор
 
Аватар для BDA
 
Регистрация: 09.11.2010
Сообщений: 7,285
По умолчанию

XE5, несомненно имеет. Замечания только для того, чтобы не вселить надежду в ТС, что так можно делать в любом случае.
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
BDA вне форума Ответить с цитированием
Старый 07.04.2014, 05:09   #9
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,281
По умолчанию

Цитата:
интервалы строго из интервала [0..255]
Блин, а я не знал. Спасибо.
Sibedir вне форума Ответить с цитированием
Старый 07.04.2014, 06:46   #10
blackstrip
Форумчанин
 
Аватар для blackstrip
 
Регистрация: 21.01.2012
Сообщений: 240
По умолчанию

Цитата:
Сообщение от FleXik Посмотреть сообщение
BDA, спасибо большое, что-то не подумал что можно так переменную использовать (два раза)...
Писал, наверное, (1<= x<= 9), а оно ругается)
blackstrip вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ввести число. Если оно положительное, найти его квадратный корень. Если отрицательное - возвести в квадратВвести число. Если оно п FYNZIK Паскаль, Turbo Pascal, PascalABC.NET 1 18.02.2014 16:29
Функция ЕСЛИ подходит только для 1 условия, а если условий больше? Slavatron1984 Microsoft Office Excel 2 08.01.2012 22:07
подходит ли заданное слово под заданный шаблон Ivan_assm Помощь студентам 2 18.04.2010 20:44
Если функция ЕСЛИ не подходит Katherina_Koval Microsoft Office Excel 1 25.07.2008 19:09