填充变量

Question

我需要帮助理解为什么我不能编译这段代码

program test 
integer,dimension(1:10) :: isquares 
isquares(:) = (j**2,j=1,10) 
print*,isquares 
end 

维隐式循环然而，这个版本是确定的：

program test 
print*,(j**2,j=1,10) 
end 

Answer 1

(j**2,j=1,10)是一个隐含的循环。对于任务，您需要先将其转换为数组：

isquares(:) = [(j**2,j=1,10)]