程序PARAMETER（N=3)INTEGERA（N，N)READ*,ADO10J=1，NLS=0DO20I=1，N20LS=LS＋A（I，J)LS=LS／NDO30I=1，N-学而优知识库

程序PARAMETER（N=3)INTEGERA（N，N)READ*,ADO10J=1，NLS=0DO20I=1，N20LS=LS＋A（I，J)LS=LS／NDO30I=1，N

程序
PARAMETER(N=3)
INTEGERA(N，N)
READ*,A
DO10J=1，N
LS=0
DO20I=1，N
20LS=LS+A(I，J)
LS=LS/N
DO30I=1，N
30A(I，J)=A(I，J)-LS
10CONTINUE
PRINT*,A
END
若输入2，4，6，8，10，12，14，16，18
程序执行后，A(3，2)为()。
(A)-2
(B)0
(C)2
(D)12

参考答案

查看答案