新手求助，关于复数运算的，求大神指导

li913

[Fortran] 纯文本查看 复制代码

program test
implicit none 
complex x
real a, b, c
x=(1+c)*exp(cmplx(0.0,a)) + (1-c)*exp(cmplx(0.0,b))
end program 

li913

pandaxox 发表于 2019-7-30 15:54
请问我在输出时想把复数的实部和虚部用f7.3格式定义的话，
该怎么写

复数看作两个实数

complex x
write(*,"(f7.3,2x,f7.3)") x