程序
character*(*)name
name=’apple’
L=len(name)
Do10I=1,L
10name(I:I)=char(Ichar(name(I:I))+I
print*,name
end
程序運(yùn)行后輸出結(jié)果為()
A.APPLE
B.brspj
C.jpsrb
D.a(chǎn)pple
您可能感興趣的試卷
你可能感興趣的試題
程序gramtraparea
dataa,b/10,5/
y(x)=1*x+1
S=(y
B.+yA.)*abc(b-a)/2
write(*,*)’S=’,S
end
執(zhí)行程序后,最接近S的值為()
A.80.1
B.-80.0
C.90.5
D.70.1
A.從未格式化的新盤
B.無任何壞扇區(qū)的磁盤
C.以前曾格式化的磁盤
D.高密度磁盤
A.科學(xué)計算和數(shù)據(jù)管理
B.實(shí)現(xiàn)程序控制
C.對計算機(jī)硬、軟件進(jìn)行組織與管理
D.各類編譯程序
當(dāng)輸入10,20時,下列程序執(zhí)行后的輸出結(jié)果為()。
READ(*,*)IX,IY
A=100.0
IF(IX/IY.GT.0)THEN
A=1.0
ELSEIF(IX/IY.LT.0)THEN
A=-1.0
ELSE
A=0.0
ENDIF
WRITE(*,*)A
END
A.0.0
B.1.0
C.–1.0
D.100.0
下列程序執(zhí)行后的輸出結(jié)果為()。
CHARACTER9*C
C=’1234567890’
CALLSS(C)
END
SUBROUTINESS(X)
CHARACTERX*2
WRITE(*,*)X
END
A.123456
B.12
C.56
D.567890
最新試題
有程序:DIMENSIONA(2,2)INTEGERA.YY=0D0201=1,2D020J=1,2A(1,J)=I*I+J*JY=Y+A(1,J)20CONTINUEWRITE(*,*)YEND此程序運(yùn)行的結(jié)果()
在Windows98資源管理器中,對磁盤格式化時若選中“快速格式化”復(fù)選框可以對磁盤進(jìn)行格式化,該磁盤必須是()。
下列程序執(zhí)行時,需輸入數(shù)據(jù)的記錄個數(shù)必須為()DIMENSIONA(4,4)READ(*,*)AEND
當(dāng)輸入10,20時,下列程序執(zhí)行后的輸出結(jié)果為()。READ(*,*)IX,IYA=100.0IF(IX/IY.GT.0)THENA=1.0ELSEIF(IX/IY.LT.0)THENA=-1.0ELSEA=0.0ENDIFWRITE(*,*)AEND
在正弦交流電路中,電壓有效值u與電流有效值的乘積為()。
有關(guān)Win98屏幕保護(hù)程序,說法錯誤的為()。
語句WRITE(*,‘(1X,413)’)(I,I=1,10,2),輸出記錄個數(shù)是()。
如圖所示為刀閘、熔斷器與電源的三種連接方法,其中正確的接法是()。
通過下列哪一種方法,使圖像可以在計算機(jī)內(nèi)部得到表示,正確的是()。
某固定資產(chǎn)原值為90000元,預(yù)計凈殘值為l0000元,使用年限為4年,若按年數(shù)總和法計算折舊,則其第3年的折舊額為()元。