File: prog1.tex

package info (click to toggle)
tetex-src 3.0.dfsg.2-1
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 122,292 kB
  • ctags: 2,709
  • sloc: makefile: 2,323; perl: 1,820; sh: 1,378; lisp: 448; python: 335; xml: 175; sed: 138; ansic: 138; yacc: 52
file content (13 lines) | stat: -rw-r--r-- 459 bytes parent folder | download | duplicates (8) 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
\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}