О. Палёк - Юмор разных лет

Наборы переменных — группа переменных, связанных общими свойствами. К примеру, массив Furniture[] содержит набор мебели, а составная переменна Ag eof Women — возраст женщины. INT LOVE [SEX, Flirt, LOVE]очевидно обозначает набор состояний любви.

Операции присваивания вообще одни из самых популярных у нас операций. Этим занимаются все, начиная с ваших детей и кончая государством.

Операции присваивания для переменных в общем такие же, как и в обычном C, кроме некоторых неважных случаев для упрощения понимания программ. Примеры:

MONEY = $100то же самое, что MONEY is $100

IF (FOUND)то же самое, что FOUND

STATE is RULEZто же самое, что RULEZ

По замыслу создателей языка, должен быть самым употребительным оператором. Действительно, разве всех нас не учили в детстве, что единственный путь к известности и достатку — труд? Однако многие из нас выросли и нашли разные пути к достатку и без утомительных циклов DO. К примеру, молодая девушка пишет в газеты бесплатных объявлений: « 18 лет, обаятельная-привлекательная 90-60-90, без специальных навыков, рассмотрю предложения от $500» . Кстати, разберем это объявление на Male C и попробуем сделать выводы.

MONEY is EMPTY;

SEEK (WORK); IF (MONEY $500) BREAK; /*Облом*/

DO {

SEX;

WHILE (HEALTH is SO-SO); }

Is STATE GOOD?

Молодая-привлекательная без особых навыков, но с запросами от $500 может получить только определенную работу, причем весьма интенсивно. При этом, правда, ответ на последний оператор программы остается открытым. Кое-кому нравиться быть « секретуткой» .

Смысл особых операторов можно понять из их перевода. Нет смысла перечислять их все, т. к. список существенно зависит от реализации языка. Однако мы разъясним смысл некоторых, используемых в этом руководстве.

SEEK() — поиск. В скобках указывается переменная, по которой ведется поиск. SEEK(Husband) и SEEK(Lover) далеко не одно и то же, хотя, конечно, каждая женщина надеется, что ее муж всегда будет хорошим любовником, а ее любовник наконец разведется с женой и жениться на ней.

FOUND () — найдено! Что найдено, смотрите в скобках. Следующий пример иллюстрирует хорошо известный факт, что искать черную кошку в темной комнате — безнадежное занятие.

DOUBLE Room = Cat = Black;

SEEK (Cat); FOUND (EMPTY);

Все возвращается на круги своя. Таким образом, RETURNнепосредственно связан с операторами циклов. Пример:

INT Age;

IF (Age > 50) IF (WORK is GOOD \!\! Alcohol is EMPTY) HEALTH is GOOD;

ELSE HEALTH is BAD;

Age!= RETURN;

DIE;

END;

Конечно, после 50 здоровье уже не то, особенно если вы злоупотребляли. С другой стороны, «Кто не курит и не пьет, тот здоровенький помрёт» — годы не возвратишь.

Большей частью опять же используется в циклах. Рассмотрим пример:

INT Age;

INT Man;

INT Tired is NO;

IF (Ag e of Women > 30)

DO { SEX; IF (Man is Tired) { SUX; LOVE is NO;

BREAK;}

CONTINUE; }

Если женщине за тридцать и ее мужу где столько же или больше, то для него начинаются трудные времена. Если он будет постоянно ссылаться на усталость, то женщину ждет облом, неудовлетворенность в любви и вообще SUX. А если не будет, но вы полагаете, что будет RULEZ?А вот и нет. Есть только продолжение, продолжение и продолжение.

Переключаться в жизни необходимо постоянно. И вынуждено, и просто потому, отдых необходим. Следующий пример иллюстрирует тот простой факт, что отдых — смена деятельности.

DOUBLE Relax;

DO {WORK; WHILE (HEALTH is SO-SO)}

SWITCH (MONEY) { CASE ($1000): СANARY; CASE ($500): Rela xHouse;

CASE ($10): BEER;}

HEALTH is GOOD;

Вопрос, как подействуют Канары, Дом Отдыха или пиво на здоровье конкретного индивида, остается открытым. Мы надеемся, что оно улучшиться (даже от пива).

BREAK — оператор аварийного выхода, чаще всего в негативном смысле (облом). Разберем пример:

CHAR WORK is Empty;

SEEK (WORK);

FOUND;

SWITCH (MONEY) { CASE ($10/Month): BREAK; CASE ($100/Month):

BREAK;

CASE ($1000/Month): RULEZ; }

Результат поисков работы может быть разным. Если зарплата меньше $1000 в месяц — SUXи BREAK(т. е. облом). Еще пример:

INT Glass;

IF (SUX) { DO Glass BREAK; }

RULEZ;

Рецепт улучшения настроения — битье посуды совершенно непонятен мужчинам. Однако, представьте, что на месте Glass (бокала) могли бы оказаться вы…

GOTO— оператор языка, которым пользователи Male C обмениваются с друг другом. Очень удобно: ваш шеф просит вас принести квартальный отчет, а вы посылаете его в $%# до переполнения его стека терпения. Другой случай: даже если вы очень торопитесь, советуем все же воспользоваться переходом, а не бежать сломя голову прямо через дорогу.

В новых веяниях (Male C++) считается, что этот оператор лишний. Однако разберем пример:

#DEFINE HOUSEKEEPING

#INCLUDE WASHING MACHINE

MAIN ()

{ FLOAT Thing is Dirty;

WHILE (Thing) { Wash;BAD; GOTO HELL;}

HELL: Shop \!\! Barbeshop \!\! Love-stor y reading; }

Понятно, что домашняя работа (в частности, стирка) бесконечна, и число грязных вещей (Thing) никогда не кончится. Поэтому необходимо использовать оператор безусловного перехода, которое в данном случае посылает эту работу в HELL. Когда его использовать, зависит от вашего настроения, однако если вы не хотите BADс вашим мужчиной, старайтесь им не злоупотреблять.

Примечание: некоторые скажут, что в написанном примере можно было воспользоваться оператором BREAK. И что? Вы остановили работу, а не послали ее к черту и вам придется рано или поздно ее продолжить, причем наверняка переменная THING существенно увеличится.

Некоторые могут заметить странное определение метки «черта». Так ведь к черту посылается стирка, а вместо нее предлагается или поход по магазинам, или парикмахерская, или просто чтение любовных романов.

Еще один пример иллюстрирует тот факт, что женщина любит ушами:

CHAR Ask "Do you love me?";

Neverending: