principal.mod

   1 modulo principal\r
   2 \r
   3 importacion: pila, elemento\r
   4 exportacion:\r
   5 \r
   6 clase Programa\r
   7 {\r
   8         inicio()\r
   9         {\r
  10                 Elemento e;\r
  11                 Pila p;\r
  12                 entero i;\r
  13                 p:=crear(Pila);\r
  14                 p.iniciar();\r
  15               i :=1;\r
  16               mientras (i<=10) hacer\r
  17                       e := crear(Elemento);\r
  18                   e.modificar(i);\r
  19                   p.apilar(e);\r
  20                   i:=i+1;\r
  21                finmientras\r
  22         }\r
  23 }