Hi Wolfgang,
You offered me the following code to write algorithms.
It seems that this does not function very well because the
withdrawal of the text no longer exists.
Thank you
Fabrice
\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