結(jié)構(gòu)工程師基礎(chǔ)科目(一)答疑精選3
瀏覽
收藏
問題內(nèi)容
對(duì) 下列程序段
PARAMETER(N=3)
INTEGER A(N，N)
READ*，A
DO 10J=1， N
20 LS=LS+A(I，J)
LS=LS/N
DO 30 I=1，N
30 A(I，J) =A(I，J) -LS
10 CONTINUE
PRING*，A
END
若輸入2，4，6，8，10，12，14，16，18
則程序運(yùn)行后A(3，2)為?
用fortran90程序編譯出結(jié)果為:14.這道題是否超剛?教材答案是2
老師回復(fù)用fortran90程序編譯出結(jié)果為:14.對(duì)于程序段，如果同學(xué)不會(huì)，可以下載fortran進(jìn)行編譯得出結(jié)果。
老師回復(fù)同學(xué)如果答案是2,那么你的題目沒有寫完整。
原題中的
LS=0
DO 20 I=1,N
你沒有打進(jìn)去。
原題為：
PARAMETER (N=3)
INTEGER A(N,N)
READ *,A
DO 10 J=1,N
LS=0
DO 20 I=1,N
20 LS=LS+A(I,J)
LS=LS/N
DO 30 I=1,N
30 A(I,J)=A(I,J)-LS
10 CONTINUE
PRINT *,A(3,2)
END
答案為2.
A (3,2)
DO 10 J=1,N (J=2)
LS=0
DO 20 I=1,N
20 LS=LS+A(I,J) (LS=A(1,2)+A(2,2)+A(3,2)=8+10+12=30)
LS=LS/N (LS=30/3=10)
DO 30 I=1,N
30 A(I,J)=A(I,J)-LS (A(3,2)=12-10=2)
10 CONTINUE
PRINT *,A(3,2)
END
最新資訊
- 2024年結(jié)構(gòu)工程師進(jìn)央企注冊(cè)，最高可獲得2萬元一次性獎(jiǎng)勵(lì)2024-09-30
- 多重補(bǔ)貼：某央企的結(jié)構(gòu)工程師注冊(cè)補(bǔ)貼公布2024-09-25
- 一級(jí)結(jié)構(gòu)工程師含金量有多高2024-07-25
- 二級(jí)結(jié)構(gòu)工程師該如何備考2024-05-16
- 一級(jí)結(jié)構(gòu)工程師基礎(chǔ)怎么備考2024-05-16
- 結(jié)構(gòu)工程師是做什么的2024-05-10
- 結(jié)構(gòu)工程師有前途嗎2024-05-10
- 一級(jí)注冊(cè)結(jié)構(gòu)工程師一年掙多少錢2024-05-10
- 結(jié)構(gòu)工程師前景及待遇2024-05-08
- 結(jié)構(gòu)工程師的工作內(nèi)容2024-05-04
打卡人數(shù)
