结构工程师基础科目(一)答疑精选3
浏览
收藏
问题内容
对 下列程序段
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
则程序运行后A(3，2)为?
用fortran90程序编译出结果为:14.这道题是否超刚?教材答案是2
老师回复用fortran90程序编译出结果为:14.对于程序段，如果同学不会，可以下载fortran进行编译得出结果。
老师回复同学如果答案是2,那么你的题目没有写完整。
原题中的
LS=0
DO 20 I=1,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
最新资讯
- 2026年一级结构工程师泛滥了吗?预计发布时间与职业前景深度分析2026-01-20
- 2026年结构工程师是干嘛的?预计发布时间与职业前景全解析2026-01-20
- 2026一级注册结构工程师难考吗?预计通过率仅8%-12%，但科学备考可攻克2026-01-19
- 2026结构工程师的工作内容全解析：从蓝图设计到现场指导的全流程指南2026-01-18
- 2026年结构工程师前景及待遇全景展望：持证者年薪可达40万+，三大发展路径2026-01-17
- 2026一级结构工程师有多难?通过率仅8.3%，攻克“工程界珠峰”全攻略2026-01-16
- 2026一级结构工程师好考吗?深度剖析考试难度与通过率2026-01-14
- 2026年二级结构工程师好考吗?深度解析：通过率15%-20%，计算量大是难关2026-01-13
- 2026一级结构工程师含金量有多高?行业“天花板”，持证年薪30-60万!2026-01-12
- 2026一级结构工程师有多难?通过率仅3-5%，如何翻越“工程界珠峰”?2026-01-12
打卡人数
