单选题 下列程序执行后的输出结果为( )。
CHARACTER *6 S
S='ABCDEF
CALL SS(S)
END
SUBROUTINE SS(S1)
CHARACTER S1*3
WRITE(*，*) S1
END
A．ABC B．BC C．CDE D．DEF