.


:




:

































 

 

 

 


. Char String




. . . .

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

type = ( );

, . , .

1. week ():

type week = ( Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday);

, . pred(), succ(), ord():

ord() ;

succ() ;

pred() .

week :

Sunday<Monday<Tuesday<Wednesday<Thursday<Friday<Saturday;

ord( Sunday )=0;

ord( Tuesday )=2;

succ( Friday ) =Saturday;

pred( Saturday ) = Friday;

, , Low() High(), . , week: Low(week)= Sunday, High(week)= Saturday.

.

, , . , boolean, char integer ( #xxx , ASCII xxx):

Type

Boolean= (false, true);

char= #0..#255;

integer= -32768..32767;

. , week, day_off ():

Type

day_off = ( Sunday, Saturday);

Sunday, Saturday, week.

, , :

var days: week;

, :

var days: ( Sunday, Monday, Tuesday, Wednesday, Thursday, Friday, Saturday);

.

1. ?

2. ?

3. ?

4. ?

5. ?

6. ( )?

type _ = (, );

7. week: ord( Wednesday );ord( Friday )?

8. type day_off = ( Sunday, Saturday): Low(day_off); High(day_off)?

. Char String

har , ASCII. . String () 255 ( har), 1 (8 ), . , 255 . :

Var S1: String[40];

Str: String;

S1 40 ( 40×8=320 ), Str - 255 .

:

1) ( ),

2) , .

, .

, .

, ( ).

1 :

Var Str1, Str2: String[20]; Ch1, Ch2:Char;

Begin

Str1:=uter;
Str2: =;

Ch1=Str1[5]; Ch2=Str2[5];

WriteLn(' Ch1=', Ch1, ' Ch2=', Ch2);

End.

:

Ch1=u Ch2=

, (, , , ..).

.

1. Length(S). , . Length(S), S - , . .

2. :

S:='computer';

Writeln(' ', S, ' ', Length(S),' ')

:





:


: 2016-11-12; !; : 1482 |


:

:

, .
==> ...

1626 - | 1552 -


© 2015-2024 lektsii.org - -

: 0.011 .