[satan]

Ну например

x:=((12+(y/z-33.456)+d[a+b-c]*56) mod 5 = 44.5);

К стати когда пишешь типовые компиляторы потом глубоко осознаешь почему вот этот код

for i:=0 to 100 do writeln(chr(i));

коренным образом отличается от
S:=''
for i:=0 to 100 do S:=S+chr(i)+#13#10;
WriteLn(S);