int pop(t_elem **stos){ /* Usuwanie oraz pobieranie cyfry ze stosu */
  t_elem *ptr; /* Tworzeni pomocniczego wskaznika na strukture */
  int cyfra;
  cyfra=(*stos)->liczba; /* Pobranie cyfy znajdujacej sie na  poczatku stosu */
  ptr=*stos;
  *stos=(*stos)->nastepny; /* Pobranie wskaznika na nastepny element */
  free(ptr); /* Usuniecie sktruktury dynamicznej */
  return cyfra;
}