【单选题】

阅读下面的程序，运行后的输出结果为()。

CHARACTER *6S
S=′ABCDEF′
END
SUBROUTINESS(S1)
CHARACTER S1 * 3
WRITE(*，*)S1
END
ABC、BCD、CDE、DEF