begin
var q := new Queue<integer>;
for var i:=1 to 5 do
q.Enqueue(i);
while q.Count > 0 do
Print(q.Dequeue);
end.