procedure sym_order(in:root)
begin
     var albero: root
     if((root!=NULL)then
         sym_order(root.left)
         print(root.info)
         sym_order(root.right)
     endif
end sym_order