|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
Задачка на понимание
Когда был в 11м классе придумал с другом одну задачку. Не то, чтоб шибко сложную, скорее просто прикольную. Вспомнилась в связи с одним недавним постом на этом форуме.
Код:
{$APPTYPE CONSOLE} uses Dialogs; procedure SuperProc(var a, b: integer); begin a := 1; b := 2; if (a=1) then exit else ShowMessage('Epic FAIL!'); end; ... jmp $ ; Happy End! The Cake Is A Lie. Последний раз редактировалось Bargest, 16.04.2012 в 18:42. |