程序 character*(*)name name=’apple’ L=len(name) Do10I=1,L 10name(I:I)=char(Ichar(name(I:I))+I print*,name end 程序运行后输出结果为（　）