Форум: "Начинающим";
Текущий архив: 2018.03.04;
Скачать: [xml.tar.bz2];
ВнизПроверка условий Найти похожие ветки
← →
Макака (2016-02-29 16:29) [0]есть штук 10 последовательных if () then
Как сделать, чтобы при выполнении первого условия остальные не проверялись?
если за ними нет кода, то можно сделать exit;
пробовал ещё
if () then
что то
иначе
if () then
итак все, но после компиляции ответ не сошёлся, так что подумал это тоже не катит.
← →
Rouse_ © (2016-02-29 16:49) [1]ну сделай case
← →
Макака (2016-02-29 16:50) [2]Я с ним никогда не работал, но похоже самое время (тоже подумал о нём)
← →
Плохиш © (2016-02-29 16:56) [3]
> но после компиляции ответ не сошёлся
Ошибка в 17й строке, тут без вариантов.
← →
Макака (2016-02-29 17:05) [4]А case только с числовыми переменными работает?
С строкой никак не сделать?
типо
F: текстовая переменная
if F="R" then Result:=1;
if F="T" then Result:=2;
← →
эндсоувот © (2016-02-29 17:19) [5]не с числовыми а с простыми типами данных.
строки и плавающая точка - к ним не относятся
← →
Макака (2016-02-29 19:47) [6]значить на мой вопрос в первом посте больше ничего не сделать?
← →
Макака (2016-02-29 19:48) [7]расходуются же ресурсы дико, если этот кусок кода миллионы раз прогоняется
← →
эндсоувот © (2016-02-29 20:05) [8]у символа есть код (числовой).
и по счастливой случайности коды эти на шкале целых стоят в том же порядке что и буквы.
и если к коду буквы R прибавить два то попадешь на букву T (перепрыгнув через S)
← →
Макака (2016-02-29 20:11) [9]Ord(), но коды идут не так как мне надо, т.е. Мне нужно старшинство по убыванию A K Q J T, по кодам не получится
← →
эндсоувот © (2016-02-29 20:52) [10]настолько не так как надо что даже
case Ord(CharSymb)
end
не помогает?
← →
Плохиш © (2016-02-29 23:37) [11]Ord("A") > Ord("K") > Ord("Q") > Ord("J") > Ord("T")
В этой реальности всегда!
← →
Плохиш © (2016-02-29 23:39) [12]
> эндсоувот © (29.02.16 20:52) [10]
>
> настолько не так как надо что даже
>
> case Ord(CharSymb)
> end
>
> не помогает?
goto [3]
PS. Партизанов здесь не любят.
← →
Плохиш © (2016-02-29 23:39) [13]Пардон
Ord("A") > Ord("J") > Ord("K") > Ord("Q") > Ord("T")
← →
Плохиш © (2016-02-29 23:41) [14]
> Мне нужно старшинство по убыванию A K Q J T
Невыполнимое условие в нашей реальности.
← →
Германн © (2016-03-01 00:38) [15]
> Макака (29.02.16 17:05) [4]
>
> А case только с числовыми переменными работает?
> С строкой никак не сделать?
Переходи на Лазарус. Там можно.
> Плохиш © (29.02.16 23:39) [13]
>
> Пардон
Галочку поверни влево :)
← →
Плохиш © (2016-03-01 01:17) [16]
> Галочку поверни влево :)
</I
Точно, но надо было подождать возмущения от топикстартера ;-)
← →
Макака (2016-03-01 04:03) [17]Да какие возмущения, я это самым первым делом проверил, посмотрел и завернул губу обратно.
← →
icWasya © (2016-03-01 09:29) [18]Для автора - код в студию!
Покажи как пробовал написать, и что, по твоему, идёт не так.
← →
Inovet © (2016-03-01 10:21) [19]> [9] Макака (29.02.16 20:11)
> Мне нужно старшинство по убыванию A K Q J T
-Ord()
← →
Игорь Шевченко © (2016-03-01 10:27) [20]http://segfault.kiev.ua/smart-questions-ru.html
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2018.03.04;
Скачать: [xml.tar.bz2];
Память: 0.48 MB
Время: 0.002 c