Как сделать вот такую фигуру в Паскале с помощью констант

На самом деле, очень просто. Сначала надо эту картинку просто нарисовать, чтобы подсчитать пробелы. Можно прямо в среде разработки паскаля (первое вложение). Затем путем вставки сделать из этой картинки набор констант (второе вложение).

А вот текст программы.

const 
  c1=    *       *;
  c2=  *   *   *   *;
  c3=*       *       *;
begin
  Writeln(c1);
  Writeln(c2);
  Writeln(c3)
end.