.


:




:

































 

 

 

 


MAX:=A[1];

FOR I:=2 TO N DO

IF (a[i]>max)then

 

begin

max:=a[i];

end;

 

ϳ

a b

a b

exp(b * ln(a))

 

 


Pascal :

+ ;

;

* ;

/ ;

div ;

mod .

 

128 5, 25 128 div 5, , 3 128 mod 5, : 128 div 5 = 25; 128 mod 5=3.

 

 

Abs(x) . | |. 䳿 Abs , Real .

Sqr(x) . 2. 䳿 Sqr , Real .

Sqrt(x) . . 䳿 Sqrt Real .

, , .

Exp(x) . . 䳿 Exp Real .

Ln(x) . ln . 䳿 Ln Real .

.

Sin(x) c . Sin . 䳿 Sin Real .

Cos(x) c . Cos. 䳿 Cos Real .

Arctan(x) . arctg . 䳿 Arctan Real p/2 + p/2.

Round(x) , . 䳿 Round IntegerLongint .

Trunc(x) : . 䳿 Trunc IntegerLongint .

Frac(x) : , . 䳿 Frac IntegerLongint .

Odd(x) , . 䳿 Odd Boolean true, false .

Int(x) , , , trunc, 䳿 trunc, 䳿 Int real.

 

Length(st) st. , . , st[0], , st[0], a ord(st[0])!

Copy(st, m, n ) stn , m. .

Concat(st1, st2) ᒺ . , +, .

Val(st, m, kod) st m. kod<> 0, .

Str(m, st) , val.

Delete(st, m, n) n m st.

Insert(st2, st1, n) st1 st2 n.



<== | ==>
 | , .
:


: 2017-02-24; !; : 201 |


:

:

: , .
==> ...

1468 - | 1442 -


© 2015-2024 lektsii.org - -

: 0.015 .