Вложенные циклы, нарисовать перевернутую елку - Turbo Pascal

Формулировка задачи:

Ребзя,помогите перевернуть елку.Такую смог нарисовать,а вот наоборот не знаю как:

Var
 i,j,l:integer;
begin
for l:=3 to 5 do
 begin
  for i:=1 to l do
   begin
    for j:=1 to i do
     write('+');
    writeln;
   end;
 end;
 readln;
end.

+ ++ +++ + ++ +++ ++++ + ++ +++ ++++ +++++

нужно получить вот такую пикчу:

+++++ ++++ +++ ++ + ++++ +++ ++ + +++ ++ +

Решение задачи: «Вложенные циклы, нарисовать перевернутую елку»

Листинг программы

Var
 i,j,l:integer;
begin
for l:=5 downto 3 do
 begin
  for i:=l downto 1 do
   begin
    for j:=1 to i do
    write('+');
    writeln;
   end;
 end;
readln;
end.

Объяснение кода листинга программы

В данном коде используется вложенный цикл для рисования перевернутой елки.

Переменная l инициализируется значением 5, что означает, что елка будет нарисована с 5 ветвями.
Затем, внутри первого цикла, переменная i инициализируется значением l, что означает, что первая ветвь будет нарисована полностью до того момента, когда i станет равным 1.
Внутри второго цикла, переменная j инициализируется значением от 1 до i, что означает, что каждая игла на ветви будет нарисована по отдельности.
Для каждой иглы выполняется команда write('+'), которая выводит символ + на экран.
После завершения внутреннего цикла, выполняется команда writeln, которая выводит символ новой строки, чтобы перейти к следующей ветви елки.
По завершении внешнего цикла, программа завершается командой readln, которая ожидает ввода пользователя.