Цитата Сообщение от Валенок Посмотреть сообщение
вот тоже
Код:
    case b of 1,2,4,8,16,32,64,128:
       q := b;
    end_case
Всё, я поплыл. Не могу пока осознать в голове, как этот case работает.
Понимаю, что список в case побитовый... дальше ступор.