Question

Как сделать пешеходный переход в Pascal ABC

Answer 1

begin
  writeln('█████████████');
  writeln('████     ████');
  writeln('█████████████');
  writeln('████     ████');
  writeln('█████████████');
  writeln('████     ████');
  writeln('█████████████');
  writeln('████     ████');
  writeln('█████████████');
  writeln('████     ████');
  writeln('█████████████');
end.