1 2 3 4 5 6 7 8 9 10 11 12 13
{ %fail } program Project1; {$ModeSwitch nestedcomments} (* (***) begin writeln('see'); readln; end.