fortran语言 DATA数组赋值问题 DIMENSION A(4,3) DATA A⼀3*-1.0,3*-2.0,3*-3.0,3*-4.0⼀

请教A(1,1)A(1,2)A(1,3)这些数组的值赋给的是多少?
2024-11-29 05:32:44
推荐回答(2个)
回答1:

这种问题根本不用问。自己用一段简单的代码就测试出来了:

real :: A(4,3)
DATA A/3*-1.0,3*-2.0,3*-3.0,3*-4.0/
write(*,*) A
end

运行结果是
-1.000000 -1.000000 -1.000000 -2.000000 -2.000000
-2.000000 -3.000000 -3.000000 -3.000000 -4.000000
-4.000000 -4.000000
请按任意键继续. . .

这就是你的问题答案。

要多学会自己摸索,什么都问别人,很难进步。

回答2:

这里的*表示的是数据重复,并非乘法,比如3*-1.0表示有3个-1.0,而非计算3*-1.0=-3.0