, . . , , .
, , , .
Formula Translator . . . , , , , .
:
1. , .
2. . .
3. , , .
4. .
IBM 1950 . . "-". 66 1966 ., , 77, 1978 . 1992 . Fortran 90, . 2004 - 2003.
, , , , .
1.
1. . . .
.
, , . (), , .
, , .
|
|
( ):
1. . . (): ,
2. . , .
3. ( ). , . (, " - ": "-"?, ?). , , . , .
4. . .
5. . , . , 2 ++ = 0, , . .
.
- .
1.1 -:
() | () | |
1. | ||
2. | ||
3. / | ||
4. / (/) | , | |
5. | ||
6. | , | |
7. | ||
8. | , |
-:
1. - ,
2. 90
, . , , (.1.1).
. 1.1.
1.2
, .
26 , 10 , : =, +, -, *, /, (, ),., $, ',:, _, #, &, <, >.
|
|
:
- ;
- , ;
- ;
- ;
- .
, , , , - . : integer, real, if, else, end, endif.
, , , , , , , , . , . , velocity , V.
,
0:9 _ $
-90 31 , -77 8
, ,
, . . , , , .
. , . (.1.2):
1.2
FORTRAN | ||
INTEGER | 5 | |
REAL | 3.14159 | |
COMPLEX | (1.3,0.00) | |
LOGICAL | .true. | |
CHARACTER | 'd' |
5 :
- , ,
, . . , , . .
, - + ( )
2 147 483 648 2 147 483 647.
,
: 7 +15 -262
, ., , , 3.14 3., , , , -
1.0-7 ( , Ŕ, " ∙ 10 ") 0.0000001
[3.40*1038,1.17*10-38]
0.0
[+1.17*10-38,+3.40*1038]
0.1≤m<1, 7 , 38
,
3.14 -7.0 160000.0 0.0000001 1.6+5 -0.0000000000023
0.0 0..0 .
1.6D+5 , D
, , , , (-10., 8.2)
|
|
-10. - -10+8,2 i
8.2 - -10+8,2 i
:.TRUE."" .FALSE. "".
()
, OK
, 32767
: = -
, parameter,
real, parameter:: pi=3.14, e=2.71
: , , , , . 5 , type . , " ", implicit none
integer, : integer x1, y1, m integer:: number=1, sec=2, al;
real, : real X, I15, Z;
complex, : complex complX, complY, complZ;
logical, : logical L1, L2;
character,
- - * , , character *70 STIN, STOUT;
- character , , character ONE, first , 1
, .
.
- , . , , , , " ", . !.
- (). . , . . , .
:
132 ;
;
;
&, ;
FPS 7200 ; 54;
.
.F90.
1.3
, , - . , , (. ) , , -, , X+Y, . , , . , , - . , , ,
|
|
, ,
,
,
1.3
() | . | Sin(x+1) | ||
** | X**3 | |||
* | X*y | |||
/ | x/y | |||
+ | X+y | |||
- | x-y | |||
- | -x |
, (. 1.3). . . . , , .
:
;
, 1 1, , . , I**(-J) 1/I**J