注冊土木工程師(巖土專業(yè))計算機應用基礎單項選擇題每日一練(2019.04.26)

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

對任意輸入的實數(shù)X，下列程序執(zhí)行后K的可能輸出值為()。
READ(*，*)X
K=2*COS(X)
PRINT*，K
END

下列程序執(zhí)行后的輸出結(jié)果為()。
CHARACTER9*C
C=’1234567890’
CALLSS(C)
END
SUBROUTINESS(X)
CHARACTERX*2
WRITE(*，*)X
END