VPF::Как указать диапазон чисел? - Форум программистов

Дата 28.6.2007, 22:39 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 67
Регистрация: 12.6.2007

Репутация: нет
Всего: нет

Например:
if
переменная>10 и <20 //??????
Then
..................

Дата 28.6.2007, 22:40 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130

Код


if (c>10) and (c<20)

--------------------

There's nothing left but silent epitaphs.

Дата 30.6.2007, 18:23 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 37
Регистрация: 2.5.2007
Где: г.Ижевск

Репутация: 2
Всего: 5

Код


if c In [11..19] then ...
if InRange(C,11,19) then ...

Это сообщение отредактировал(а) Shaggy - 30.6.2007, 18:23

Дата 30.6.2007, 18:48 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 187
Регистрация: 7.12.2006
Где: Belarussia, Gomel

Репутация: нет
Всего: 2

Код


If (m>10 and m<20) then
begin
end

--------------------

[code=sql]select name, telephone from Girls where age between 20 and 25 and (.)(.) >= 2 order by IQ desc [/code]

Дата 3.7.2007, 06:03 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 49
Регистрация: 16.4.2006
Где: Петропавловск-Кам чатский

Репутация: нет
Всего: 1

Через множества можно. В Делфе уже все организовано за нас smile

Код


type
    TRange = set of 10..20;

Если элементов множества менее 32, то быстродействие увеличивается.

Использование:

Код


var
   Range: set of 10..20;
  I: integer;
begin
   if I in Range then
         .........
end;

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »