Когда был в 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;
...
Суть: написать программу с использованием этой процедуры (не внося изменений в неё) так, чтобы процедура выдала сообщение 'Epic FAIL!'. Грубо говоря, писать код можно только на месте многоточия.