.


:




:

































 

 

 

 





 

 

 

 

 

- 2004

 

 

. . . , . .

 

29 2003 . ( 2).

 

充..4

充5

1. ...7

2. .13

2.1. 酅.13

2.1.1. 腅14

2.1.2. ⅅ15

2.1.2.1. () ..15

2.1.2.2. 16

2.1.2.3. ...17

2.1.2.4. 19

2.2. 酅20

2.2.1. 酅...20

2.2.2. .22

2.2.3. ...23

2.3. .25

2.3.1. , 녅....25

2.3.2. ()...28

2.3.2.1. .28

2.3.2.2. .30

3. 腅.31

4. PASCAL.33

5. PASCAL.34

6. PASCAL ...37

.40

 

C , , , , MS Office.

, , , , , .

.

Borland Pascal, Pascal.

.

Pascal Borland Pascal (Turbo Pascal), , Pascal .

, [2].

, , , [1], , .

Pascal.

, [1, . 5-7], :

; ;

; ;

; .

, .

.

, , (). , , , , .

, , (), .

Pascal [1, . 58-61] :

; ;

; ;

; .

Pascal :

; ( );

; ( );

; ( );

; ( ).

.

:

rogram primer1;

primer1 , .

[1, . 59-61] , , , , , , .

:

 

Const

n=50;

k=25.5;

:

Var

a, b: real;

i, k: integer;

X: array [1..20] of real;

Y: array [1..10,1..10] of integer;

, a b , i k , X , 20- , Y ( 10*10), .

[1, .46] begin end, , end .

.

.

:

a:=1;

b:=5;

x:=a+b;

y:=1-3.4*c;

z:=d*x+2.5*y-1.53;

, , , .

:

sin(x), cos(x), ln(x), exp(x), sqrt(x) . sinx, cosx, lnx, ex, Öx .

read, readln, write, writeln.

- :

readln(b1,b2,,bn); ( )

writeln(b1,b2,,bn); ( )

b1,b2,,bn - , .

begin end , .

Pascal , .

 

, .

Pascal , [1, . 51 - 54]. if.

if:

if _ then 1 lse 2;

1, 2 .

, begin - end.

if:

1) ;

2) , true (), 1, - 2;

3) , if.

if else:

if _ then 1;

1 , _ true (), , if.

 





:


: 2016-10-30; !; : 1151 |


:

:

,
==> ...

1689 - | 1568 -


© 2015-2024 lektsii.org - -

: 0.017 .