Fabrice Couvreur
29. Juli 2016 um 16:43
I know that Wolfgang wrote a module to reproduce algorithms, but it is in English !
Can we ensure to respect the withdrawal of the text ?

You can use the lines environment with enabled spaces (space=on).

\defineframedtext
  [algorithmframe]
  [width=fit,
   background=color,
   backgroundcolor=lightgray,
   framecolor=darkred,
   corner=round]

\definelines
  [algorithm]
  [space=on,
   before=\startalgorithmframe,
   after=\stopalgorithmframe]

\starttext

\startalgorithm
Variables \math{I} et \math{J} entiers
T tableau d'entiers
Début
Pour \math{I} allant de \math{1} à \math{3}
   Pour \math{J} allant de \math{1} à \math{3}
     Si \math{J>I}
        Alors \math{T[I, J]=J-I}
        Sinon \math{T[I, J]=0}
     Fin Si
   Fin Pour
Fin
\stopalgorithm

\stoptext

Wolfgang