{ Declaration d'un tableau de variables           }
{ de type agrege position en deux dimensions      }

structure position2D
  x : reel <- 0.0
  y : reel <- 0.0
fin structure

{ Programme principal                             }

constante entier TAILLE <- 10

action principale()
  locales
    i : entier
    tpos : Tableau[TAILLE] de position2D
  pour i de 0 à TAILLE-1 faire
    Ecran.afficherln(tpos[i].x," ",tpos[i].y)
  fait
  Ecran.afficherln()
fin action