Шахматная доска

## // как бы шахматная доска (oxoxoxoxo)
for var i := 1 to 7 do
begin
  for var j := 1 to 7 do
  begin
    if (i+j) mod 2 = 0 then Print('O')
        else Print('X');
  end;
  Println; // перенос строки
  end;