program fjf926;

var
  i: Integer;

begin
  if True then
    if False then
    else
      begin
        repeat until True;
        if False then
          begin
            i := i i  { WRONG }
          end
        else
      end
end.
