Известно, что шахматная доска имеет размерность 8х8 и состоит из клеток 2х цветов, например, черного и белого (см. рисунок). Каждая клетка имеет координату, состоящую из буквы и цифры. Горизонтальное расположение клетки определяется буквой от A до H, а вертикальное – цифрой от 1 до 8. Заметим, что клетка с координатой А1 имеет черный цвет. Требуется по заданной координате определить цвет клетки.

Var s:string;
begin
  write(Введите координаты клетки );
  readln(s);
  if (ord(s[1]) mod 20)and(ord(s[2]) mod 20)then
  writeln(Черная) else writeln(Белая);  
end.

Тест №1
Введите координаты клетки E4
Белая

Тест №2
Введите координаты клетки e7
Черная