给数组赋值end dodo i = 1,n,1write(*,*)a(i)!输出复数end doend看a.txt文件1.9+ 3.141*I2.2- 5.20*I6+ 1.0001*I8 - 5.02*I90+ 3.04*I4.234- 5000*I91+ 3.000*I4.734- 1.0*I看输出效果 ...
玩转fortran中..fortran中的复数计算虽然支持得很好,但是对实部和虚部分别操作并不清晰(不像pascal 它是个结构,可以分别赋值): 1. 它只能通过函数来提取实部或者虚部, 2. 但它赋予了类似函数的方法 Z
复数类型的声明和赋值方法与实数类型类似,但需要用一对圆括号括起来的两个实数来表示实部和虚部,用逗号分隔。例如:a = (1.5,1.0)表示a = 1.5 + 1.0i。 复数类型也可以分为单精度和双精度,通过kind值来指定。例如:complex (kind=8) a表示双精度复数类型。 复数之间可以进行加减乘除等运算,但需要注意运算结果...
这表示的是一个复数的数值。以下是复数赋值、输出的例子。fortran代码：
变量赋值 Fortran中浮点数的默认精度是单精度,且浮点数常数的默认精度也是单精度(大部分的语言都是双精度,或者无限精度),需要在浮点数的末尾加d0或者kind标识 。例如1.2d0,1.2_8表示的都是双精度。 复数变量的赋值 如果是常数,可以使用a=(1.0,2.0)来赋值,如果有变量就需要一个转换函数a=cmplx(x,y),但是,此处...
另外,讲一下复数的赋值,形如(0.,0.) 1 COMPLEX :: AA=(1.0,36.7) 最后,我们讲一下派生类型,所谓派生类型,就是让程序员在内置类型的基础上构建一个特殊的类型,下面使用一段代码说明: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
复数运算符合相应复数运算规则 声明字符与字符串 声明字符与字符串 programmaincharacter::acharacter(20)::b a="H"b="Hello World"write(*,*)awrite(*,*)bstopend 字符串操作:数组索引、切片操作 programmaincharacter(len=30)::first,second first="Good morning"second=first(1:4)write(*,*)firstwrite(...
3. 复数complex(kind=4)::e=(x,y)! 复数使用2个值来表示complex(kind=8)::f=(x,y)! 4. 字符串character(10)string1character(len=10)string2string1="Good Morning"! 改变部分内容string1(6:)="Evening"string1(1:2)="GO"string2=string1//", haha"! 字符串拼接! 字符串相关函数函数char(num...
复数运算符合相应复数运算规则 声明字符与字符串 声明字符与字符串 program main character :: a character(20) :: b a="H" b="Hello World" write(*,*) a write(*,*) b stop end 1. 2. 3. 4. 5. 6. 7. 8. 9. 字符串操作:数组索引、切片操作 ...
(1)不分大小写(2)每句末尾不必要写分 号(3)程序代码命令间的空格没有意义(4)不像C, Fortran不使用 (5) 数据类型多出了复数和逻辑判断类型。比如复数类型contplex : a !声明复数的方法。复数显然方便了科学计算,满足了工程方面需求a=(l.0,2.0) !a=l+i (6)多出了乘幕运算。乘塞除了整数还可以是...