程序
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é)計(jì)算和數(shù)據(jù)管理
B.實(shí)現(xiàn)程序控制
C.對計(jì)算機(jī)硬、軟件進(jìn)行組織與管理
D.各類編譯程序
當(dāng)輸入10，20時(shí)，下列程序執(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
最新試題
對任意輸入的實(shí)數(shù)X，下列程序執(zhí)行后K的可能輸出值為()。READ(*，*)XK=2*COS(X)PRINT*，KEND
下列程序執(zhí)行后的輸出結(jié)果為()。CHARACTER*6CC=’1234567890’CALLSS(C)ENDSUEROUTINESS(C)CHARACTERC*2WRITE(*，*)CEND
通過下列哪一種方法，使圖像可以在計(jì)算機(jī)內(nèi)部得到表示，正確的是()。
校園網(wǎng)屬于（）。
當(dāng)輸入1.5，2.5，3.5，4.0下列程序執(zhí)行后的輸出結(jié)果為()。DIMENSIONA(2，2)READ(*，*)ASUM=0DO10I=1，2DO20J=I，2K=A(I，J)*I*J10A(1，2)=KWRITE(*，*)A(2，1)END
某地區(qū)常遭水患，年平均受災(zāi)損失達(dá)240萬元。為減少洪水災(zāi)害損失，該地區(qū)擬修建水壩，其投資預(yù)計(jì)為480萬元，項(xiàng)目壽命期按無限年考慮，年維護(hù)費(fèi)12萬元，如利率為5%，則該項(xiàng)目的效益費(fèi)用比為（）。
在Windows98資源管理器中，對磁盤格式化時(shí)若選中“快速格式化”復(fù)選框可以對磁盤進(jìn)行格式化，該磁盤必須是()。
語句WRITE(*，‘(1X，413)’)(I，I=1，10，2)，輸出記錄個(gè)數(shù)是()。
在Win98默認(rèn)情況下，雙擊某個(gè)*.BAT文件的圖標(biāo)意味著該批處理文件將進(jìn)行的操作為()。
某固定資產(chǎn)原值為90000元，預(yù)計(jì)凈殘值為l0000元，使用年限為4年，若按年數(shù)總和法計(jì)算折舊，則其第3年的折舊額為（）元。