可以直接把复型常数赋给复型变量。 11 如: complex c,d c=(30,6.3) d=(8.75e+5,-678e-3) 但是,若复型常数中的实部或虚部不是常数,而是表达 式,则须用cmpx函数将实部和虚部组成复型数后再赋给 复型变量。 如:c=(3.0*2,63+17) c=cmp|X(3.0*2,63+17)y 当cmpx函数中只有一个自变量时,则它代表实部,虚 部为0。 如:c= cmplx(3.0)→c=30,0.0) 53复型数据 2021/2/24
11 2021/2/24 §3 复型数据 可以直接把复型常数赋给复型变量。 如： 但是，若复型常数中的实部或虚部不是常数，而是表达 式，则须用cmplx函数将实部和虚部组成复型数后再赋给 复型变量。 如： 当cmplx函数中只有一个自变量时，则它代表实部，虚 部为0。 如： complex c , d c=(3.0 , 6.3) d=(8.75e+5 , -67.8e-3) c=(3.0*2 , 6.3+1.7) c=cmplx(3.0*2 , 6.3+1.7) c=cmplx(3.0) c=(3.0 , 0.0)
2.复数可以直接进行加、减、乘、除运算。 12 如: complex a,b,c a=(1.0,2.0) b=(30,4.0) c=a+b (4.0,60) c=a-b 20,-20) c=ab (-5.0,10.0) c=a/b (11.0/25,20/25) 3当abs函数中的自变量为复数时,得到的是复数的模。 如: complex a a=(30,4.0) write(*,为)abs(a)abs(a)=√302+402=50 53复型数据 2021/2/24
12 2021/2/24 2. 复数可以直接进行加、减、乘、除运算。 如： 3.当abs函数中的自变量为复数时，得到的是复数的模。 如： complex a , b , c a=(1.0 , 2.0) b=(3.0 , 4.0) c=a+b c=a-b c=a*b c=a/b (4.0 , 6.0) (-2.0 , -2.0) (-5.0 , 10.0) (11.0/25 , 2.0/25) §3 复型数据 complex a a=(3.0 , 4.0) write(* , *)abs(a) abs(a) 3.0 4.0 5.0 2 2 = + =
4.复数的输入输出。 13 釆用表控输入语句read()输入时,键入时要 以复型常数的形式输入(即一对括号中由逗号分开 的两个实数)。 釆用表控输出语句 write(,输出时,输出的是 复型常数或一对常数的形式。 例62】 complex a,b,c read(, )a, b c=a/b write(, )a*b, c end 53复型数据 2021/2/24
13 2021/2/24 4. 复数的输入输出。 采用表控输入语句read(* , *)输入时，键入时要 以复型常数的形式输入（即一对括号中由逗号分开 的两个实数）。 采用表控输出语句write(* , *)输出时，输出的是 复型常数或一对常数的形式。 【例6.2】 §3 复型数据 complex a , b , c read(* , *)a , b c=a/b write(* , *)a*b , c end