begin
  integerarray p,q,r(1:9)
endofprogram