begin
   q := a[]
