program helloworld();
begin
begin
iAmABadVariable:=2-2;
while (iAmABadVariable) do {This while clause will be evaluated as false and will throw a warning}
begin
{This is a bad comment and will generate a warning 
because a second { just now is being placed inside
the comment area}
end;
end;
end.