Question

Напишите программу, выводящую на экран изображение шахматной доски, где чёрные клетки изображаются звёздочками, а белые — пробелами. Рекомендуемый вид экрана после выполнения программы представлен ниже:

Answer 1

Const
  s1='*  *  *  *  ';
  s2='  *  *  *  *';
var
  i:integer;
begin
  for i:=1 to 4 do Writeln(s1,#13#10,s2)
end.

Результат выполнения программы:
*  *  *  * 
  *  *  *  *
*  *  *  * 
  *  *  *  *
*  *  *  * 
  *  *  *  *
*  *  *  * 
  *  *  *  *