程序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