.


:




:

































 

 

 

 


8




 

() . ʳ , , 0 256 (, , ). ' : var '_: set of _;

, :

( TRUE, ): '__1='__2;

: '__1<>'__2;

( TRUE, ): '__1<='__2;

:

in '_;

' ( , ):

'__1 + '__2;

( , ): '__1 - '__2;

; , : '__1*'__2;

: , ; (, s1:=[ ] - , s2:=[3..9,12] - 3 9, 12). , .

: , . . , in (, , , ). ֳ , .

, A Z. , .

1) ³ .

2) , . ( ) , .

:

- .

, , . a b, :

a:= a+b b:= a-b a:= a-b

- .

, :

a:=a+b-a*b b:=((a+b)-a)+(a-b) a:=((a+b)-a)+(a-b)

, , , ( ). , .

3) :

 

4) : litera - ; a, b - .

5) :

Program p8;

var a,b: set of char;

litera:char;

Begin

a:=[F,I,R,S,T]);

b:=[S,E,C,O,N,D];

a:=a+b-a*b;

b:=((a+b)-a)+(a-b);

a:=((a+b)-a)+(a-b);

write(set a = );

for litera:=A to Z do





:


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


:

:

,
==> ...

1876 - | 1715 -


© 2015-2024 lektsii.org - -

: 0.009 .