Lab6_1

var a := new Queue<integer>;
begin
  for var i := 1 to 10 do
    a.Enqueue(random(-10,20));

  writeln(a);

  for var i := 1 to 5 do
    a.Dequeue();

  writeln(a);

  var c: integer;
  readln(c);
  writeln(c in a);
end.