单选题 阅读下列FORTRAN程序：
CHARACTER A*5
A='ABCDE'
CALL S(A)
END
SUBROUTINE S(X)
CHARACTER X*3
WRITE(*，*)X
END
执行上述程序后，输出的X值为( )。
A．'AB B．DE' C．CDE D．ABC