結(jié)構(gòu)工程師基礎(chǔ)科目(一)答疑精選3
問題內(nèi)容
對 下列程序段
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.對于程序段,如果同學(xué)不會,可以下載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
最新資訊
- 2025年注冊結(jié)構(gòu)工程師一年多少錢2024-12-19
- 2025年一級結(jié)構(gòu)工程師多少錢一年2024-12-19
- 2025年結(jié)構(gòu)工程師是做什么的2024-12-18
- 2025年結(jié)構(gòu)工程師的工作方向2024-11-26
- 2025年結(jié)構(gòu)工程師能做什么工作2024-11-26
- 2025年結(jié)構(gòu)工程師的工作內(nèi)容2024-11-18
- 2025年結(jié)構(gòu)工程師工作內(nèi)容2024-11-18
- 2024年結(jié)構(gòu)工程師進(jìn)央企注冊,最高可獲得2萬元一次性獎勵2024-09-30
- 多重補(bǔ)貼:某央企的結(jié)構(gòu)工程師注冊補(bǔ)貼公布2024-09-25
- 一級結(jié)構(gòu)工程師含金量有多高2024-07-25