程序

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

在狭水道内，如不需要被追越船采取行动就能安全追越，则追越船：（）

A.可以直接追越

B.一边鸣放追越声号一边追越

C.鸣放追越声号征得被追越船同意后再进行追越

D.鸣放警告信号后进行追越