: DATAMATION Jul.?? pp.207-209
=============================================
Ed Post
Wilsonville, Orezon
,
( "" "
", ). ,
, - , .
, "DO 10
I = 1, 10" "", " -
" " - -
". , B. Feirstein, " -
", PocketBook, 1982,
,
.
. ,
, 12-
, ,
-
. ,
.
, -,
.
-
, .
.
, -
- .
. .
, , : "
?". "
, '', ,
''", - . [ : Nicklaus Wirth
, Worth - , ]
, ,
- . , -
- -
, G H
IBM/370.
: -
, -IV .
, , -
( )
.
, -
. ,
.
-
.
, ,
. ,
, , -
, ,
,
. ,
.
-
, ,
1000 , .
.
200000 ,
2 . ,
-
.
:
- GOTO;
- DO
;
- IF,
.. ;
- ,
, 20
;
- :
;
- IF,
REPEAT ... UNTIL CASE,
, ;
GOTO.
.
, , ,
. , ,
(" + = ",
Prentice Hall, 1976 [ - . "", 198?]),
, -
, .
,
. , , -
.
, ,
, ,
,
6- .
?
CP/M ? ! , -
, .
CP/M .
UNIX, , - -
UNIX' , -
PRINT - ,
UNIX . -
UNIX,
USENET .
, OS/370. -
IJK305I JSL. -
6--
, -
.
OS/370 .
-
, - -
.
- . , OS/370
,
, .
? ,
, .
, , -
.
, -
. , - -
. -
, , ,
. , Seymour
Cray, - Cray-1
Control Data, -
CDC 7600 . , Cray -
.
-
Texas Instruments. ,
, -
.
,
,
-
. :
,
.
10 , -
029. ,
.
.
,
, .
,
Xerox Palo Alto
Alto Dorado. , -
-
Smalltalk ( )
"".
Xerox -
, -
, EMACS VI. ,
-
: ", , ". -
: " , ";
.. , , , ,
. TECO - .
, TECO -
, .
TECO - -
,
.
TECO , , , -
.
-
.
,
SuperZap ( -IBM ).
, ,
,
. -
.
,
-,
- (
) .
.
:
- , Mortran Ratfor;
;
- ; -
;
- ;
,
EQUIVALENCE -
.
, ;
-
;
( ), ..
.
? -
?
, -
""
People.
.
-, Cray-1, -
. -
, .
- ,
NASA,
, . ""
,
, -
.
,
.
"" "" .
, -
- , 10
6-
,
. , -
"", -
,
.
"" - -
.
80 +/- 3 .
.
, .
. , -
. , - -
,
ADA. , ADA
,
. ,
, . ,
-
. ,
, ,
- ,
,
(Edsgar Dijkstra) . ,
,
"GOTO - ", -
. , -
-
.
,
, , .
, ,
- Atari.
. , ,
. LucasFilm
, ,
, 50-
(Star Wars).
, ,
,
. ,
, ,
,
.
,
- .
, ,
, ,
.
,
- . ,
:
- ,
, ;
-
"", 11-
14- ;
- - ;
- -,
;
- : "
.
, ";
-
,
.. , -
.
-
?
.
, .
.
,
- .
. ,
, .
"" .
.
, ,
OS JSL ,
. ,
1969 .
(,
, ). ,
, , Oreos,
- -, -
.
, ,
.
30, 40 50
, . ,
.
;
.
,
, 9
, . ,
2 3 50- .
,
. ,
9 5, ,
.
. -
. ,
. , , ASCII
( EBCDIC) . .
3 ,
.
,
,
, .
. - -
.
-
, , -
, .
,
"" !
UNIX' -
?
, , ,
. OS/370,
,
.
, -
, . , , -
-77,
-66
-
DO .
UNIX -
, . UNIX'
,
.
, ,
. , ,
"C"
. ,
, 7 (10 ?, 8 ?)
"" (pointer).
,
, -
#DEFINE.
, .
, , -
, . ,
. ,
,
,
, .
!
: .. --
Last-modified: Thu, 12 Feb 1998 08:05:22 GMT