.


:




:

































 

 

 

 





, . , . .

. . ( ), . . - . , .

 
 
 
 

- , .

. , , .

. . . . . - , .

.

- . . , . . . () - . - . , . . . , , . , -, . -: .

 
 

, , .. , . .

. () . , , .

, . . :

;

;

;

.

. , , .

:

;

;

;

, .

, . "", .

. .

, .

- . :

: , , ;

- ;

"GOTO".

.

, . - , , .

50- . , FORTRAN () FORmula TRANslator ( ), 1954 . IBM , , .. . , .

ALGOL () Algorithmic Language , . , , IBM. , . , .

, , . BASIC () Beginner's All-purpose Symbolic Instruction Code , . 1965 . . , , . 300 .

, . -, , , .

, . FOR NEXT .

: .

100 DIM T (100) - ,

200 READ N - N,

300 FOR I = 1 TO N - I =1 N,

400 READ T (I) - T (I),

500 NEXT I - I,

600 GOSUB 1100 -

700 PRINT S

800 GOTO 2000

900 DATA 4

1000 DATA 23, 34, 7, 9

1100 REM S = (1...N)

1200 LET S = 0

1300 FOR I = 1 TO N

1400 IF NOT ODD(T(I)) THEN GOTO 1600

1500 LET S = S + T(I)

1600 NEXT I

1700 RETURN

2000 END.

COBOL () Common Business Oriented Language , 1960 . . , , . , , . , . , , .. , .

Pascal (), , 1960 . . , .

: 30 . .

, :

PROGRAM (input, output);

var a, b, s: integer;

begin read (a, b);

s: = a + b;

write (s);

end.

, ISO 7185. , Borland Pascal Turbo Pascal.

70- . Bell Telephone Laboratories (). . . UNIX. , , .

- , - . . , , . , , , .

. , .

, , , , , , . .

80- - -. . - ++ Java. Java .

- , . Visual Basic, Delphi, Visual C ++.

, - . PROLOG (Programming in Logic - ) - . . 1973 . : , , ; ; .

, 5- .

1 . , , 1 . . ( , ) . , , . , . , , , . , . , , , , . , .





:


: 2016-12-06; !; : 641 |


:

:

- , , .
==> ...

1516 - | 1335 -


© 2015-2024 lektsii.org - -

: 0.027 .