информа / _Pascal10 / 07 / urok07p

-----------------| BorlandPascal 7.0 |-------------------
--------| ЋЇҐа в®ал п§лЄ . ђ Ў®в  б ¬ ббЁў ¬Ё Ё бва®Є ¬Ё |--------

Ћб­®ў­лҐ дг­ЄжЁЁ а Ў®вл б® бва®Є ¬Ё:

chr(i) - ЇаҐ®Ўа §гҐв 楫®Ґ зЁб«® i ў бЁ¬ў®« Є®¤  ASCII (0-255)
Ord('<бЁ¬ў®«>') - ў®§ўа й Ґв Ї®ап¤Є®ўл© ­®¬Ґа (Є®¤ ASCII) <бЁ¬ў®« >
-----

ЇаЁ¬Ґал:
write(chr(65)) - Ўг¤Ґв ўлўҐ¤Ґ­ бЁ¬ў®« 'A'
write(ord('A')) - Ўг¤Ґв ўлўҐ¤Ґ­ ­®¬Ґа 65


ЏаЁ¬Ґа:
str : string - ЇҐаҐ¬Ґ­­ п вЁЇ  "бва®Є "
...
Pos(search_word,str)
Length(str)
Upcase(str) - ЇаҐ®Ўа §®ў ­ЁҐ бЁ¬ў®«  Ё§ Їа®ЇЁб­®Ј® ў бва®з­л©
Copy
Insert

_________________________________________________________
‡ ¤ ­ЁҐ:
1. ђҐиЁвм § ¤ зг.

 . „ ­ 楫®зЁб«Ґ­­л© ¬ ббЁў A а §¬Ґа  10. ‚뢥бвЁ Ї®ап¤Є®ўл© ­®¬Ґа
Ї®б«Ґ¤­ҐЈ® Ё§ вҐе ҐЈ® н«Ґ¬Ґ­в®ў AK, Є®в®алҐ г¤®ў«Ґвў®апов ¤ў®©­®¬г
­Ґа ўҐ­бвўг A(1) < A(K) < A(10). …б«Ё в ЄЁе н«Ґ¬Ґ­в®ў ­Ґв, в® ўлўҐбвЁ 0.

Ў. „ ­ ¬ ббЁў а §¬Ґа  N Ё жҐ«лҐ зЁб«  K Ё L (1 < K <= L <= N). Ќ ©вЁ
б㬬㠢бҐе н«Ґ¬Ґ­в®ў ¬ ббЁў , Єа®¬Ґ н«Ґ¬Ґ­в®ў б ­®¬Ґа ¬Ё ®в K ¤® L
ўЄ«озЁвҐ«м­®.

ў. „ ­ ¬ ббЁў ­Ґ­г«Ґўле 楫ле зЁбҐ« а §¬Ґа  N. Џа®ўҐаЁвм, зҐаҐ¤говбп «Ё
ў ­Ґ¬ Ї®«®¦ЁвҐ«м­лҐ Ё ®ваЁж вҐ«м­лҐ зЁб« . …б«Ё зҐаҐ¤говбп, в® ўлўҐбвЁ
0, Ґб«Ё ­Ґв, в® ўлўҐбвЁ Ї®ап¤Є®ўл© ­®¬Ґа ЇҐаў®Ј® н«Ґ¬Ґ­в , ­ аги о饣®
§ Є®­®¬Ґа­®бвм.

Ј. „ ­ ¬ ббЁў A а §¬Ґа  N. Ќ ©вЁ ¬ ЄбЁ¬ «м­л© н«Ґ¬Ґ­в Ё§ ҐЈ® н«Ґ¬Ґ­в®ў
б ­ҐзҐв­л¬Ё ­®¬Ґа ¬Ё: A(1), A(3), A(5), ...

¤. „ ­ ¬ ббЁў а §¬Ґа  N. Ќ ©вЁ ­®¬Ґа  вҐе н«Ґ¬Ґ­в®ў ¬ ббЁў , Є®в®алҐ
Ў®«миҐ бў®ҐЈ® «Ґў®Ј® б®бҐ¤ , Ё Є®«ЁзҐбвў® в ЄЁе н«Ґ¬Ґ­в®ў. Ќ ©¤Ґ­­лҐ
­®¬Ґа  ўлў®¤Ёвм ў Ї®ап¤ЄҐ Ёе гЎлў ­Ёп.

Ґ. „ ­ 楫®зЁб«Ґ­­л© ¬ ббЁў а §¬Ґа  N, ўбҐ н«Ґ¬Ґ­вл Є®в®а®Ј® гЇ®а冷祭л
(Ї® ў®§а бв ­Ёо Ё«Ё Ї® гЎлў ­Ёо). Ќ ©вЁ Є®«ЁзҐбвў® а §«Ёз­ле н«Ґ¬Ґ­в®ў
ў ¤ ­­®¬ ¬ ббЁўҐ.

с. „ ­® зЁб«® R Ё ¬ ббЁў A а §¬Ґа  N. Ќ ©вЁ н«Ґ¬Ґ­в ¬ ббЁў , Є®в®ал©
­ ЁЎ®«ҐҐ Ў«Ё§®Є Є зЁб«г R (в® Ґбвм в Є®© н«Ґ¬Ґ­в AK, ¤«п Є®в®а®Ј®
ўҐ«ЁзЁ­  |A(K) - R| пў«пҐвбп ¬Ё­Ё¬ «м­®©).

¦. „ ­ 楫®зЁб«Ґ­­л© ¬ ббЁў а §¬Ґа  N. Ќ ©вЁ ¬ ЄбЁ¬ «м­®Ґ Є®«ЁзҐбвў® ҐЈ®
®¤Ё­ Є®ўле н«Ґ¬Ґ­в®ў.

§. „ ­ 楫®зЁб«Ґ­­л© ¬ ббЁў а §¬Ґа  N. …б«Ё ®­ пў«пҐвбп ЇҐаҐбв ­®ўЄ®©, в®
Ґбвм ᮤҐа¦Ёв ўбҐ зЁб«  ®в 1 ¤® N, в® ўлўҐбвЁ 0; ў Їа®вЁў­®¬ б«гз Ґ
ўлўҐбвЁ ­®¬Ґа ЇҐаў®Ј® ­Ґ¤®ЇгбвЁ¬®Ј® н«Ґ¬Ґ­в .

Ё. „ ­ ¬ ббЁў а §¬Ґа  N. Ќ ©вЁ ­®¬Ґа ҐЈ® Ї®б«Ґ¤­ҐЈ® «®Є «м­®Ј® ¬ ЄбЁ¬г¬ 
(«®Є «м­л© ¬ ЄбЁ¬г¬ - нв® н«Ґ¬Ґ­в, Є®в®ал© Ў®«миҐ «оЎ®Ј® Ё§ бў®Ёе б®бҐ¤Ґ©).


2. ђҐиЁвм § ¤ зг, ЁбЇ®«м§гп дг­ЄжЁЁ а Ў®вл б® бва®Є ¬Ё.

 . „ ­  бва®Є , ᮤҐа¦ й п Ї®«­®Ґ Ё¬п д ©« , в® Ґбвм Ё¬п ¤ЁбЄ , бЇЁб®Є
Є в «®Ј®ў (Їгвм), б®Ўб⢥­­® Ё¬п Ё а биЁаҐ­ЁҐ. ‚뤥«Ёвм Ё§ нв®© бва®ЄЁ
Ё¬п д ©«  (ЎҐ§ а биЁаҐ­Ёп).

Ў. „ ­  бва®Є -ЇаҐ¤«®¦Ґ­ЁҐ ­  агббЄ®¬ п§лЄҐ. ‡ иЁда®ў вм ҐҐ, ўлЇ®«­Ёў
жЁЄ«ЁзҐбЄго § ¬Ґ­г Є ¦¤®© ЎгЄўл ­  б«Ґ¤гойго §  ­Ґ© ў  «д ўЁвҐ Ё
б®еа ­Ёў ЇаЁ н⮬ ॣЁбва ЎгЄў (<Ђ> ЇҐаҐ©¤Ґв ў <Ѓ>, < > - ў <Ў>,
<Ѓ>- ў <‚>, <п> - ў < > Ё в. ¤.). ЃгЄўг <_> ў  «д ўЁвҐ ­Ґ гзЁвлў вм
(<Ґ> ¤®«¦­  ЇҐаҐе®¤Ёвм ў <¦>). ‡­ ЄЁ ЇаҐЇЁ­ ­Ёп Ё Їа®ЎҐ«л ­Ґ Ё§¬Ґ­пвм.

ў. „ ­  бва®Є -ЇаҐ¤«®¦Ґ­ЁҐ. ‡ иЁда®ў вм ҐҐ, Ї®¬ҐбвЁў ў­ з «Ґ ўбҐ бЁ¬ў®«л,
а бЇ®«®¦Ґ­­лҐ ­  зҐв­ле Ї®§ЁжЁпе бва®ЄЁ,   § вҐ¬, ў ®Ўа в­®¬ Ї®ап¤ЄҐ,
ўбҐ бЁ¬ў®«л, а бЇ®«®¦Ґ­­лҐ ­  ­ҐзҐв­ле Ї®§ЁжЁпе (­ ЇаЁ¬Ґа, бва®Є 
<Џа®Ја ¬¬ > ЇаҐўа вЁвбп ў <аЈ ¬ ¬а®Џ>).

Ј. „ ­  бва®Є , ᮤҐа¦ й п Ї®«­®Ґ Ё¬п д ©« . ‚뤥«Ёвм Ё§ нв®© бва®ЄЁ
­ §ў ­ЁҐ ЇҐаў®Ј® Є в «®Ј  (ЎҐ§ бЁ¬ў®«®ў <\>). …б«Ё д ©« ᮤҐа¦Ёвбп
ў Є®а­Ґў®¬ Є в «®ЈҐ, в® ўлўҐбвЁ бЁ¬ў®« <\>.

¤. „ ­  бва®Є -ЇаҐ¤«®¦Ґ­ЁҐ ­  агббЄ®¬ п§лЄҐ Ё зЁб«® K (0 < K < 10).
‡ иЁда®ў вм бва®Єг, ўлЇ®«­Ёў жЁЄ«ЁзҐбЄго § ¬Ґ­г Є ¦¤®© ЎгЄўл ­ 
ЎгЄўг в®Ј® ¦Ґ ॣЁбва , а бЇ®«®¦Ґ­­го ў  «д ўЁвҐ ­  K-© Ї®§ЁжЁЁ Ї®б«Ґ
иЁда㥬®© ЎгЄўл (­ ЇаЁ¬Ґа, ¤«п K = 2 <Ђ> ЇҐаҐ©¤Ґв ў <‚>, < > - ў <ў>,
<Ѓ> - ў <ѓ>, <п> - ў <Ў> Ё в. ¤.). ЃгЄўг <_> ў  «д ўЁвҐ ­Ґ гзЁвлў вм,
§­ ЄЁ ЇаҐЇЁ­ ­Ёп Ё Їа®ЎҐ«л ­Ґ Ё§¬Ґ­пвм.

Ґ. „ ­  бва®Є , ᮤҐа¦ й п « вЁ­бЄЁҐ ЎгЄўл Ё ЄагЈ«лҐ бЄ®ЎЄЁ. …б«Ё бЄ®ЎЄЁ
а ббв ў«Ґ­л Їа ўЁ«м­® (в® Ґбвм Є ¦¤®© ®вЄалў о饩 ᮮ⢥вбвўгҐв ®¤­ 
§ Єалў ой п), в® ўлўҐбвЁ зЁб«® 0. ‚ Їа®вЁў­®¬ б«гз Ґ ўлўҐбвЁ Ё«Ё ­®¬Ґа
Ї®§ЁжЁЁ, ў Є®в®а®© а бЇ®«®¦Ґ­  ЇҐаў п ®иЁЎ®з­ п § Єалў ой п бЄ®ЎЄ ,
Ё«Ё, Ґб«Ё § Єалў ойЁе бЄ®Ў®Є ­Ґ еў в Ґв, зЁб«® -1.

с. „ ­  бва®Є -ЇаҐ¤«®¦Ґ­ЁҐ б Ё§Ўлв®з­л¬Ё Їа®ЎҐ« ¬Ё ¬Ґ¦¤г б«®ў ¬Ё.
ЏаҐ®Ўа §®ў вм ҐҐ в Є, зв®Ўл ¬Ґ¦¤г б«®ў ¬Ё Ўл« а®ў­® ®¤Ё­ Їа®ЎҐ«.

¦. „ ­  бва®Є , б®бв®пй п Ё§ агббЄЁе б«®ў, а §¤Ґ«Ґ­­ле Їа®ЎҐ« ¬Ё (®¤­Ё¬
Ё«Ё ­ҐбЄ®«мЄЁ¬Ё). ‚뢥бвЁ бва®Єг, ᮤҐа¦ йго нвЁ ¦Ґ б«®ў , а §¤Ґ«Ґ­­лҐ
®¤­Ё¬ Їа®ЎҐ«®¬ Ё а бЇ®«®¦Ґ­­лҐ ў ®Ўа в­®¬ Ї®ап¤ЄҐ.

§. „ ­  бва®Є -ЇаҐ¤«®¦Ґ­ЁҐ ­  агббЄ®¬ п§лЄҐ. Џ®¤бзЁв вм Є®«ЁзҐбвў®
ᮤҐа¦ йЁебп ў бва®ЄҐ §­ Є®ў ЇаҐЇЁ­ ­Ёп.

Ё. „ ­  бва®Є , б®бв®пй п Ё§ агббЄЁе б«®ў, а §¤Ґ«Ґ­­ле Їа®ЎҐ« ¬Ё (®¤­Ё¬ Ё«Ё
­ҐбЄ®«мЄЁ¬Ё). Ќ ©вЁ ¤«Ё­г б ¬®Ј® ¤«Ё­­®Ј® б«®ў .