Poziome fastrygi (4 pkt.)
-------------------------

Pozioma fastryga jest to nastepujacy sposob ulozenia wierzcholkow drzewa na liscie:
- korzen drzewa jest pierwszym wierzcholkiem na liscie, 
- jesli na prawo od danego wierzcholka, na tym samym poziomie, lezy inny 
  wierzcholek, to powinien on byc nastepnym wierzcholkiem na liscie, 
- jesli dany wierzcholek jest ostatnim na danym poziomie, to nastepnym 
  wierzcholkiem na liscie powinien byc skrajnie lewy wierzcholek lezacy 
  poziom nizej.

Przyklad:
---------
Na rysunku wierzcholki sa ponumerowane zgodnie z kolejnoscia wystepowania 
na fastrydze.

                                 1
                                / \
                              /     \
                            2         3
                             \       / \
                              4     5   6
                                  /      \
                                 7        8



Dane sa nastepujace deklaracje:
type
  drzewo = ^ wezel;
  wezel  = record
             inf: tinf; {Dane przechowywane w wezle}
             l, p : drzewo; { Dowiazania do synow }
             f : drzewo;    { Fastryga }
           end;


Napisz modul implementujacy abstrakcyjny typ danych - kolejki
oraz program glowny fastrygujacy drzewa.

Program powinien zawierac:
 * procedure: procedure fastryga (d : drzewo), ktora fastryguje drzewo
   korzystajac z modulu Kolejki;
 * procedury tworzace drzewa binarne;
 * procedury wypisujace wyniki (tj. fastryge);
 * (jak zwykle) procedury usuwajace wszystkie zaalokowane struktury danych.