псевдокод:

//Это программное обеспечение публикуется на правах лицензии GNU
//Вы имеете право модифицировать, распространять, использовать это
//программное обеспечение в коммерческих и образовательных целях

Счетчик = 0;
Порш = 0;

Пока (Порш == 0) Цикл

   Счетчик ++;
   Порш = СгенерироватьСлучайноеЧислоИзСписка(0, 1);

   Если (Порш == 1)
      ЗавершитьЦикл;
   КонецЕсли;

   Если (Счетчик < 10)
      ВывестиСообщение("Дорогой, ты обещал мне Порш");
      ПоцеловатьВУхо;
      НакормитьУжином;
   ИначеЕсли (Счетчик < 20)
      ВывестиСообщение("Будь мужчиной, выполни обещание. Купи Порш");
      ПоджаритьЯичницу;
      ЛечьСпатьПораньше;
  ИначеЕсли (Счетчик < 50)
      ВывестиПредупреждение("Сука!!!! Купи Порш!!!");
      Рыдать = СоздатьОбъект(РыдатьНавзрыд);
      Рыдать -> ЖилеткаСоседа;
  ИначеЕсли (Счетчик == Константы -> ПоследнееКитайское)
      Вектор = "хуй";
      ПослатьНа(Вектор);
      Рыдать = СоздатьОбъект(РыдатьНавзрыд);
      Рыдать -> ЖилеткаСоседа;
      Дать = СоздатьОбъект(ВнебрачныйСекс);
      Дать -> Везде(Рыдать -> ЖилеткаСоседа -> Владелец);
  ИначеЕсли (Счетчик > Константы -> Заебал)
      ВывестиСистемноеСообщение(Константы -> НеустранимаяОшибка);
      ОчиститьПамять;
      АварийноЗавершитьРаботуСистемы;
КонецЦикла

  НакормитьУжиномВкусно;
  СделатьМинет;
  ЗахотетьОбъект(Аппартаменты_на_Кипре);

Отредактировано Guano (2007-10-11 11:38:28)

Guano
Какое определение мужчине -- "неустранимая ошибка" )))