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

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

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

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