<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">\begin{programs}[0.5cm]
\PROCEDURE FORT\_TYPAGE \IS
  \TYPE COULEURS \IS
           (ROUGE, ORANGE, JAUNE, VERT, BLEU, INDIGO, VIOLET);
  A : \ARRAY (1..5) \OF COULEURS
                        := (BLEU, ROUGE, VERT, JAUNE, VIOLET);
  B : \ARRAY (1..5) \OF COULEURS;
\BEGIN
  B(1) := A(1); \label{progFORTTYPAGEinstruction1}
  B(1..5) := A(1..5); \label{progFORTTYPAGEinstruction2}
  B := A; \label{progFORTTYPAGEinstruction3}
\END FORT\_TYPAGE;
\end{programs}</pre></body></html>