Tugas Algoritma

E. for i := 1 to 5 do
         for j := 5 downto 1 do
              if (i >= j) then
                 write('0')
              else
                 write('*')
              end if
         end for
         writeln
    end for