Задачка A ДоскаЗадается N. Необходимо вывести цвет каждой клеточки дощечки N

Задачка AДощечка

Задается N. Нужно вывести цвет каждой клеточки доски N x N, если известно, что они покрашены в шахматном порядке и клеточка (1, 1) - белая.

Формат входных данных

1-ая строка входного файла содержит единственное целое N (1 lt;= N lt;= 10).

Формат выходных данных

Выведите N строк в каждой N знаков подходящий цвету этой ячейки: W если белая и B если темная.

Задать свой вопрос
1 ответ
Var
   n, i, j: integer;
begin
     readln(n);
     for i := 1 to n do
     begin
         for j := 1 to n do
             if ((j + i) mod 2 = 0) then
                write('W':2)
             else
                 write('B':2);
         writeln;
     end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт