Question

FORTRAN WRITE(7,110)

WRITE(7,110)
COMPLEX,PARAMETER::A=(0.,1.)
这是什么意思啊？

Answer 1

1).WRITE(7,110)
这个WRITE（7,110）一行的后面是不是还有数据啊，有的话就是以“110”标签指定的格式（也就是 format），向"7"指定的文件写数据；如果这一行后面没有数据，那么这个语句有问题。
举例：
open(7,file="a.txt") !打开文件“a.txt”，并在程序中以“7”这个数字来代替这个文件名。
write(7,*)3 !以默认格式向“7”指定 的文件（也即“a.txt”）中写入3，默认整形，因为3是整数
write(7,110) 3 !以110号标签指定的格式向“7”指定的文件中 写入3；结果在a.txt中显示3.000000，
!因为110号标签指定的 格式是输出实数，占10个数位宽度，同时保留小数点后6位
close(7) !关闭“7”（即a.txt）
110 format(f10.6)

2).complex,parameter::A=(0.,1.)
复数由实部和虚部构成，即一个复数可以写成w=a+i*b，a和b都是实数；
这个语句的作用是定义一个复数常量A，其值为 i，即A=0+i*1.0=i;
因为A是常量，所以在程序中不能改变A的值。