Тема: Булевые операции
Показать сообщение отдельно
  #4  
Старый 09.10.2013, 20:07
Аватар для @Rafa3L
@Rafa3L @Rafa3L вне форума
Начинающий
  
Регистрация: 09.11.2011
Адрес: Москва
Сообщения: 144
Версия Delphi: XE2
Репутация: 11216
По умолчанию
Цитата:
Сообщение от ART
...без использование else...
и
Цитата:
...Без ифов...


без else грустно
Код:
var
z: array[0..1] of integer = (1, -1);
...
y:= z[(x mod 2)];
case x of
0..3: y:= 0;
end;
...
__________________
Помогаю платно.
Помогаю иногда бесплатно.
Ответить с цитированием