routine printarray(integerarray(3)name A)
end
endoffile