單項選擇題

程序
character*(*)name
name=’apple’
L=len(name)
Do10I=1,L
10name(I:I)=char(Ichar(name(I:I))+I
print*,name
end
程序運行后輸出結果為()

A.APPLE
B.brspj
C.jpsrb
D.apple