以下子程序用于在一维数组中找出最大项：
    SUBROUTINE SEARCH(X，N，P)
    REAL X(N)
    P=______
    DO  10  J=1，N
    IF(X(J).GT.P)  P=X(J)
    10  CONTINUE
    END
    为使程序完整，应在______处放入    。