单项选择题

Which traversal method for a binary tree does the following Pascal code illustrate   Procedure traverse(p:pointer);   Begin    Ifp<>NIL      Then begin          Traverse (p^.left);         Process(p);         Traverse(p^.right)        End;     End_

A.pre_order
B.middle_order
C.none
D.last_order