program bl;

uses
  System.Collections;

var
  p: Stack := new Stack();

begin
  p.Push('хуй');
  p.Push('пизда');
  p.Push('джигурда');
  while (p.Count > 0) do
    writeln(p.Pop());
end.