Результатов: 57

52

ПОКА Флаг_ПолныйЖивот=вранье И ВнутреннийКонтроль=разрешено
начало цикла
Кошелек.Открыть;
ЕСЛИ Кошелек.СуммаНаличности>=Пиво[Клинское.Аррива].Стоимость*2 ТО
начало
Кошелек.ПоложитьДеньги(Продавец.Купить(Пиво[Клинское.Аррива],
Кошелек.ВзятьДеньги(Пиво[Клинское.Аррива].Стоимость));
ВыпитьСДругомПоКружкеПива(Пиво[Клинское.Аррива]);
конец
ИНАЧЕ
ЕСЛИ Друг.Кошелек.Сумма>0 ТО
Кошелек.ПоложитьДеньги(Друг.ЗанятьДеньги(Пиво[Клинское.Аррива].Стоимость*2);
ЕСЛИ Живот.ОпределитьКоличествоПива()>=Живот.Вместимость*0,9 ТО
начало
Флаг_ПолныйЖивот=правда;
ПОПРОБОВАТЬ
СходитьВТуалет;
УСПЕШНО
Флаг_ПолныйЖивот=вранье;
КОНЕЦ
конец;
конец цикла

функция ВнутреннийКонтроль
начало
ЕСЛИ 2*2=4 ТО
ответ=разрешено
ИНАЧЕ
ответ=запрещено
конец

55

Конец юности: едешь по ученическому и просят предъявить справку из школы.
Конец молодости: едешь по студенческому и просят предъявить студенческий билет.
Начало старости: едешь без билета, но пенсионное уже не спрашивают.

56

В лесу должен открыться новый магазин. Все ждут, выстроились в очередь.
Сам медведь пришёл и, как все, занял очередь. Около 9 утра приходит заяц
и хочет пройти в начало очереди. Медведь:
- Заяц, ёклмн в натуре! Мы тут в очереди стоим, а ты куда лезешь?
Заяц безмолвно ушёл. На следующий день та же ситуёвина - очередь, медведь,
заяц пытается пройти без очереди. Медведь:
- Заяц, ёшкин кот, куда прёшь! Иди в конец очереди!
Заяц:
- Бля, и сегодня не открою магазин...

12