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

Question

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

---

Comments

А для чего ее писать?

---

Мы из ума должны взять?

---

Паскаль

Answer 1

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

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

Comments

Скажи пожалуйста, что означают # между цифрами 13 и 10?

---

В языке Паскаль так записываются символы при помощи их десятичного кода в таблице ASCII. В данном случае это коды символов "перевод строки" и "возврат каретки" - последовательность, которая эквивалентна отдельному оператору Writeln; с пустым списком: она делает то же самое - вызывает переход к новой строке вывода.

---

Спасибо большое.

---

Иначе бы пришлось писать так: for i:=1 to 4 do begin Writeln(s1); Writeln; Writeln(s2) end;

---

Пожалуйста

---

Согласитесь, использование #13#10 делает эффективнее и нагляднее общий код программы.

---

Можно было также написать Writeln(s1+#13#10+s2);

---

Спасибо