ΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² ΡƒΡ‡Ρ‘Π±Π΅, ΠΎΡ‡Π΅Π½ΡŒ быстро...
Π Π°Π±ΠΎΡ‚Π°Π΅ΠΌ вмСстС Π΄ΠΎ ΠΏΠΎΠ±Π΅Π΄Ρ‹

ЛогичСский Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ…

Π Π΅Ρ„Π΅Ρ€Π°Ρ‚ΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² Π½Π°ΠΏΠΈΡΠ°Π½ΠΈΠΈΠ£Π·Π½Π°Ρ‚ΡŒ ΡΡ‚ΠΎΠΈΠΌΠΎΡΡ‚ΡŒΠΌΠΎΠ΅ΠΉ Ρ€Π°Π±ΠΎΡ‚Ρ‹

Π€ΡƒΠ½ΠΊΡ†ΠΈΠΈ ord, succ ΠΈ pred. ЗначСния ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Π² ΡΠ·Ρ‹ΠΊΠ΅ Pascal автоматичСски Π½ΡƒΠΌΠ΅Ρ€ΡƒΡŽΡ‚ΡΡ 0, 1, 2 ΠΈ Ρ‚. Π΄. Π£ΠΊΠ°Π·Π°Π½Π½Ρ‹Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ Π½ΠΎΠΌΠ΅Ρ€ значСния ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ пСрСчислимого Ρ‚ΠΈΠΏΠ°, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ ΠΈ ΠΏΡ€Π΅Π΄Ρ‹Π΄ΡƒΡ‰ΠΈΠΉ элСмСнт соотвСтствСнно. НапримСр, ΠΏΡƒΡΡ‚ΡŒ Π±Ρ‹Π»ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΎ присваиваниС day: ^Thursday;, Ρ‚ΠΎΠ³Π΄Π° ord (day) ΠΈΠΌΠ΅Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ 3, succ (day) — Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Friday, pred (day) — Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Wednesday… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

ЛогичСский Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ… (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

ΠŸΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Π΅ логичСского (ΠΈΠ»ΠΈ Π±ΡƒΠ»Π΅Π²ΠΎΡŽ, булСвского Ρ‚ΠΈΠΏΠ°) ΠΌΠΎΠ³ΡƒΡ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ значСния Π΄Π²ΡƒΡ… констант — true (истина) ΠΈ false (лоТь). Π”Π°Π½Π½Ρ‹ΠΉ Ρ‚ΠΈΠΏ описываСтся Π·Π°Ρ€Π΅Π·Π΅Ρ€Π²ΠΈΡ€ΠΎΠ²Π°Π½Π½Ρ‹ΠΌ словом boolean.

ЛогичСский Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ… ΠΈΠΌΠ΅Π΅Ρ‚ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ особСнности:

  • β€’ Π·Π°Π½ΠΈΠΌΠ°Π΅Ρ‚ Π² ΠΏΠ°ΠΌΡΡ‚ΠΈ 1 Π±Π°ΠΉΡ‚;
  • β€’ значСния логичСского Ρ‚ΠΈΠΏΠ° упорядочСны — false считаСтся мСньшС, Ρ‡Π΅ΠΌ true. Π­Ρ‚ΠΎ, Π² Ρ‡Π°ΡΡ‚ности, позволяСт ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΠΊ Π±ΡƒΠ»Π΅Π²ΡΠΊΠΈΠΌ ΠΎΠΏΠ΅Ρ€Π°Π½Π΄Π°ΠΌ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ;
  • β€’ ΠΈΠΌΠ΅ΡŽΡ‚ мСсто ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ: ord (false) =0, ord (true) =1, succ (false)=true, pred (true) = false.

Ѐункция ord ΠΏΠΎΠ΄Ρ€ΠΎΠ±Π½Π΅Π΅ Π±ΡƒΠ΄Π΅Ρ‚ рассмотрСна Π΄Π°Π»Π΅Π΅.

ΠŸΡ€ΠΈ Π²Π²ΠΎΠ΄Π΅ Π΄Π°Π½Π½Ρ‹Ρ… логичСского Ρ‚ΠΈΠΏΠ° слСдуСт Π²Π²ΠΎΠ΄ΠΈΡ‚ΡŒ значСния констант true ΠΈ false «ΠΊΠ°ΠΊ Π΅ΡΡ‚ΡŒ». Если трСбуСтся Ρ€Π°Π±ΠΎΡ‚Π°Ρ‚ΡŒ с Π»ΠΎΠ³ΠΈΡ‡Π΅ΡΠΊΠΈΠΌΠΈ Π΄Π°Π½Π½Ρ‹ΠΌΠΈ Π² Π²ΠΈΠ΄Π΅ 0 ΠΈ 1, Ρ‚ΠΎ ΠΊ ΠΊΠΎΠ½ΡΡ‚Π°Π½Ρ‚Π°ΠΌ ΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒΡΡ функция ord.

К Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π°ΠΌ логичСского Ρ‚ΠΈΠΏΠ° ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡŽΡ‚ΡΡ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ (Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈΠΌΠ΅Π΅Ρ‚ логичСский Ρ‚ΠΈΠΏ):

  • 1) унарная опСрация отрицания not (x). Если x=true, Ρ‚ΠΎ not (Ρ…) =f alse. Если x=f alse, Ρ‚ΠΎ not (Ρ…) =true;
  • 2) Π±ΠΈΠ½Π°Ρ€Π½Ρ‹Π΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ and (ΠΊΠΎΠ½ΡŠΡŽΠ½ΠΊΡ†ΠΈΡ, ΠΈΠ»ΠΈ логичСскоС ΡƒΠΌΠ½ΠΎΠΆΠ΅Π½ΠΈΠ΅), or (Π΄ΠΈΠ·ΡŠΡŽΠ½ΠΊΡ†ΠΈΡ, ΠΈΠ»ΠΈ логичСскоС слоТСниС), Ρ…ΠΎΠ³ (ΠΈΡΠΊΠ»ΡŽΡ‡Π°ΡŽΡ‰Π°Ρ «ΠΈΠ»ΠΈ»). ЗначСния этих ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Ρ‹ Π² Ρ‚Π°Π±Π». 3.4.

Π’Π°Π±Π»ΠΈΡ†Π° ЗА

ЛогичСскиС ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ

X.

Π£.

x and Ρƒ.

x or Ρƒ.

x Ρ…ΠΎΠ³ Ρƒ.

false.

false.

false.

false.

false.

false.

true.

false.

true.

true.

true.

false.

false.

true.

true.

true.

true.

true.

true.

false.

Π‘ΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ… (Ρ‚ΠΈΠΏ char) ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½ для хранСния ΠΎΠ΄Π½ΠΎΠ³ΠΎ символа (Π±ΡƒΠΊΠ²Ρ‹, Π·Π½Π°ΠΊΠ°, ΠΊΠΎΠ΄Π°).

Π’ Turbo Pascal Ρ‚ΠΈΠΏ char Π·Π°Π½ΠΈΠΌΠ°Π΅Ρ‚ Π² ΠΏΠ°ΠΌΡΡ‚ΠΈ 1 Π±Π°ΠΉΡ‚ ΠΈ ΠΌΠΎΠΆΠ΅Ρ‚ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ΡŒ любой ΠΈΠ· 256 символов ΠΊΠΎΠ΄ΠΎΠ²ΠΎΠΉ Ρ‚Π°Π±Π»ΠΈΡ†Ρ‹ ASCII[1]. Π’ PascalABC.NET для кодирования символов ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΠ΅Ρ‚ΡΡ совмСстимая с Π½Π΅ΠΉ кодовая Ρ‚Π°Π±Π»ΠΈΡ†Π° Unicode [2] (UTF-8), ΠΊΠ°ΠΆΠ΄Ρ‹ΠΉ символ ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ Π·Π°Π½ΠΈΠΌΠ°Π΅Ρ‚ Π² ΠΏΠ°ΠΌΡΡ‚ΠΈ 2 Π±Π°ΠΉΡ‚Π° (всСго Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ 65 536 символов).

ΠŸΡ€ΠΈΡΠ²ΠΎΠ΅Π½ΠΈΠ΅ символьной ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Π½ΠΎΠ³ΠΎ значСния ΠΌΠΎΠΆΠ½ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

  • 1) явно ΡƒΠΊΠ°Π·Π°Ρ‚ΡŒ символ. Π‘Π°ΠΌ символ Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±Ρ‹Ρ‚ΡŒ Π·Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ Π² Π°ΠΏΠΎΡΡ‚Ρ€ΠΎΡ„Ρ‹ (ΠΎΠ΄ΠΈΠ½Π°Ρ€Π½Ρ‹Π΅ ΠΊΠ°Π²Ρ‹Ρ‡ΠΊΠΈ), Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, Π°: = ' D';
  • 2) явно ΡƒΠΊΠ°Π·Π°Ρ‚ΡŒ ΠΊΠΎΠ΄ символа. ΠŸΠ΅Ρ€Π΅Π΄ ΠΊΠΎΠ΄ΠΎΠΌ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ΠΏΠΎΡΡ‚Π°Π²ΠΈΡ‚ΡŒ #. Π‘ΠΈΠΌΠ²ΠΎΠ»Ρ‹ с ΠΊΠΎΠ΄Π°ΠΌΠΈ ΠΎΡ‚ 0 Π΄ΠΎ 31 Π²ΠΊΠ»ΡŽΡ‡ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ ΠΈ ΡΠΈΠΌΠ²ΠΎΠ» с ΠΊΠΎΠ΄ΠΎΠΌ 127 ΡΠ²Π»ΡΡŽΡ‚ΡΡ слуТСбными, Π² Ρ‡Π°ΡΡ‚ности #8 соотвСтствуСт Π½Π°ΠΆΠ°Ρ‚ΠΈΡŽ клавиши Backspace, #9 — Π½Π°ΠΆΠ°Ρ‚ΠΈΡŽ Tab, #13 — Enter, #27 — Escape. Π‘ΠΈΠΌΠ²ΠΎΠ»Ρ‹ с ΠΊΠΎΠ΄Π°ΠΌΠΈ ΠΎΡ‚ 32 Π΄ΠΎ 126 ΡΠ²Π»ΡΡŽΡ‚ΡΡ ΠΏΠ΅Ρ‡Π°Ρ‚Π°Π΅ΠΌΡ‹ΠΌΠΈ ΠΈ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ латинскиС Π±ΡƒΠΊΠ²Ρ‹, Π·Π½Π°ΠΊΠΈ прСпинания ΠΈ ΠΏΡ€. Π’ Turbo Pascal ΠΊΠΎΠ΄ символа Π΄ΠΎΠ»ΠΆΠ΅Π½ Π±Ρ‹Ρ‚ΡŒ Π² ΠΏΡ€Π΅Π΄Π΅Π»Π°Ρ… ΠΎΡ‚ 0 Π΄ΠΎ 255, Π² PascalABC.NET — ΠΎΡ‚ 0 Π΄ΠΎ 65 535.

Над Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π°ΠΌΠΈ символьного Ρ‚ΠΈΠ½Π° Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡŽΡ‚ΡΡ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ:

  • 1) всС ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ: =, ΠΎ, >=, <=. Π‘Ρ€Π°Π²Π½Π΅Π½ΠΈΠ΅ происходит ΠΏΠΎ ΠΊΠΎΠ΄Ρƒ символа. Π’Π°ΠΊ, ΠΈΠΌΠ΅ΡŽΡ‚ мСсто ΡΠΎΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ 'Π°'с'А', ' F ' > ' Π• ', ' 7 ' =#55;
  • 2) встроСнныС Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ прСобразования ord© ΠΈ chr (k). ΠŸΠ΅Ρ€Π²Π°Ρ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ ΠΊΠΎΠ΄ символа с Π² ΠΊΠΎΠ΄ΠΈΡ€ΠΎΠ²ΠΊΠ΅ ASCII (для Turbo Pascal) ΠΈΠ»ΠΈ Windows-ΠΊΠΎΠ΄ΠΈΡ€ΠΎΠ²ΠΊΠ΅ (для PascalABC.NET); Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈΠΌΠ΅Π΅Ρ‚ ΡΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ. Вторая функция Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ сам символ, ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΉ ΠΊΠΎΠ΄Ρƒ ΠΊ; Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈΠΌΠ΅Π΅Ρ‚ цСлочислСнный Ρ‚ΠΈΠΏ. Π’ PascalABC.NET ΠΈΠΌΠ΅ΡŽΡ‚ΡΡ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ordunicode © ΠΈ chrunicode (k), Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡŽΡ‰ΠΈΠ΅ Π°Π½Π°Π»ΠΎΠ³ΠΈΡ‡Π½Ρ‹Π΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ для символов Π² ΠΊΠΎΠ΄ΠΈΡ€ΠΎΠ²ΠΊΠ΅ UTF-8;
  • 3) Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ прСобразования рСгистров upcase © ΠΈ lowcase (с); Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈΠΌΠ΅Π΅Ρ‚ ΡΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ. ΠŸΠ΅Ρ€Π²Π°Ρ ΠΏΠ΅Ρ€Π΅Π²ΠΎΠ΄ΠΈΡ‚ символ Π² Π²Π΅Ρ€Ρ…Π½ΠΈΠΉ рСгистр, вторая — Π² Π½ΠΈΠΆΠ½ΠΈΠΉ;

Π’Π°ΠΆΠ½ΠΎ!

Π’ Turbo Pascal отсутствуСт функция lowcase ©. Π’ PascalABC.NET ΠΏΡ€ΠΈΡΡƒΡ‚ΡΡ‚Π²ΡƒΡŽΡ‚ ΠΎΠ±Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ.[3][4]

2) объявлСниС ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… описанного ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°. Π­Ρ‚ΠΎ дСлаСтся послС Π·Π°Ρ€Π΅Π·Π΅Ρ€Π²ΠΈΡ€ΠΎΠ²Π°Π½Π½ΠΎΠ³ΠΎ слова Var ΠΈ ΠΈΠΌΠ΅Π΅Ρ‚ стандартный для объявлСния ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ синтаксис список_ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…: имя_польз_Ρ‚ΠΈΠΏΠ°;.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€ объявлСния пСрСчислимого Ρ‚ΠΈΠΏΠ° ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½ Π² Π»ΠΈΡΡ‚ΠΈΠ½Π³Π΅ 3.4.

Листинг 3.4 Π’ΡƒΡ€Π΅

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

Var

day:week;

ΠžΡΠΎΠ±Π΅Π½Π½ΠΎΡΡ‚ΠΈ использования пСрСчислимых Ρ‚ΠΈΠΏΠΎΠ² Π΄Π°Π½Π½Ρ‹Ρ…:

β€’ ΡƒΠΊΠ°Π·Ρ‹Π²Π°Π΅ΠΌΡ‹ΠΉ список_Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ являСтся списком констант, ΠΊ ΠΈΠΌΠ΅Π½Π°ΠΌ ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… Π² ΡΠ·Ρ‹ΠΊΠ΅ Pascal ΠΏΡ€Π΅Π΄ΡŠΡΠ²Π»ΡΠ΅Ρ‚ΡΡ Ρ‚Ρ€Π΅Π±ΠΎΠ²Π°Π½ΠΈΠ΅ ΡƒΠ½ΠΈΠΊΠ°Π»ΡŒΠ½ΠΎΡΡ‚ΠΈ, поэтому ΠΏΡ€ΠΈ описании ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΈΡ… Ρ‚ΠΈΠΏΠΎΠ² нСдопустимо ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚ΡŒ ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²Ρ‹Π΅ значСния Π² ΡΠΏΠΈΡΠΊΠ΅_Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ. НапримСр, ΠΎΡˆΠΈΠ±ΠΎΡ‡Π½Ρ‹ΠΌ Π±ΡƒΠ΄Π΅Ρ‚ использованиС Π² ΠΎΠ΄Π½ΠΎΠΉ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ Ρ€Π°Π½Π΅Π΅ описанного Ρ‚ΠΈΠ½Π° week ΠΈ Ρ‚ΠΈΠΏΠ° holiday, описываСмого ΠΊΠ°ΠΊ.

holiday = (Saturday, Sunday);;

β€’ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹ΠΌ пСрСчислимого Ρ‚ΠΈΠΏΠ° ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ присвоСны Ρ‚ΠΎΠ»ΡŒΠΊΠΎ ΡƒΠΊΠ°Π·Π°Π½Π½Ρ‹Π΅ Π² ΠΎΠΏΠΈΡΠ°Π½ΠΈΠΈ Ρ‚ΠΈΠΏΡ‹ значСния, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, присваиваниС day: =Monday; являСтся допустимым, a day: = Someday; — Π½Π΅Ρ‚.

Над Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π°ΠΌΠΈ пСрСчислимого Ρ‚ΠΈΠΏΠ° Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡŽΡ‚ΡΡ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ:

  • 1) опСрация присваивания;
  • 2) Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ord, succ ΠΈ pred. ЗначСния ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Π² ΡΠ·Ρ‹ΠΊΠ΅ Pascal автоматичСски Π½ΡƒΠΌΠ΅Ρ€ΡƒΡŽΡ‚ΡΡ 0, 1, 2 ΠΈ Ρ‚. Π΄. Π£ΠΊΠ°Π·Π°Π½Π½Ρ‹Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ Π½ΠΎΠΌΠ΅Ρ€ значСния ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ пСрСчислимого Ρ‚ΠΈΠΏΠ°, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ ΠΈ ΠΏΡ€Π΅Π΄Ρ‹Π΄ΡƒΡ‰ΠΈΠΉ элСмСнт соотвСтствСнно. НапримСр, ΠΏΡƒΡΡ‚ΡŒ Π±Ρ‹Π»ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΎ присваиваниС day: ^Thursday;, Ρ‚ΠΎΠ³Π΄Π° ord (day) ΠΈΠΌΠ΅Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ 3, succ (day) — Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Friday, pred (day) — Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Wednesday;
  • 3) ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ =, ΠΎ, >=, <=. Π‘Ρ€Π°Π²Π½Π΅Π½ΠΈΠ΅ производится ΠΏΠΎ Π½ΠΎΠΌΠ΅Ρ€Π°ΠΌ элСмСнтов Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ, ΠΏΡ€ΠΈΡ‡Π΅ΠΌ ΡΡ€Π°Π²Π½ΠΈΠ²Π°Ρ‚ΡŒ ΠΌΠΎΠΆΠ½ΠΎ ΠΊΠ°ΠΊ сами константы (Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΠ΅ Monday

ΠŸΡ€ΠΈ ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ pred ΠΊ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ, Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ΠΌ ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ являСтся ΠΏΠ΅Ρ€Π²Ρ‹ΠΉ элСмСнт списка пСрСчислСния, Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠΌ Π±ΡƒΠ΄Π΅Ρ‚ -1. ΠŸΡ€ΠΈ ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ pred ΠΊ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ, Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ΠΌ ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ являСтся послСдний элСмСнт, Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠΌ Π±ΡƒΠ΄Π΅Ρ‚ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π΅ числовоС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅.

НапримСр, Ссли пСрСмСнная day ΠΈΠΌΠ΅Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Monday, Ρ‚ΠΎ pred (day) Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ΠΈΡ‚ -1. Если пСрСмСнная day ΠΈΠΌΠ΅Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Sunday, Ρ‚ΠΎ succ (day) Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ΠΈΡ‚ 7.

  • [1] 2 ASCII Table and Description [Π­Π»Π΅ΠΊΡ‚Ρ€ΠΎΠ½Π½Ρ‹ΠΉ рСсурс]. URL: http://www.asciitable.com (Π΄Π°Ρ‚Π° обращСния: 30.01.2015).
  • [2] UTF-8 encoding table and Unicode characters [Π­Π»Π΅ΠΊΡ‚Ρ€ΠΎΠ½Π½Ρ‹ΠΉ рСсурс]. URL: http://vww.utl8-chartable.de/unicode-utl8-table.pl (Π΄Π°Ρ‚Π° обращСния: 30.01.2015).
  • [3] 4) Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ succ© ΠΈ pred©, Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‰ΠΈΠ΅ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉΠΈ ΠΏΡ€Π΅Π΄Ρ‹Π΄ΡƒΡ‰ΠΈΠΉ символы соотвСтствСнно, Π½ΠΎ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡŽ ΠΊ ΡΠΈΠΌΠ²ΠΎΠ»Ρƒ св ΠΊΠΎΠ΄ΠΎΠ²ΠΎΠΉ Ρ‚Π°Π±Π»ΠΈΡ†Π΅. НапримСр, succ (' f ') Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ символ ' g '. ΠŸΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΠΈΠΌΡ‹ΠΉ Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ…. ΠŸΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΠΈΠΌΡ‹ΠΉ Ρ‚ΠΈΠΏ прСдставляСт собой ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΈΠΉ Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ… Π² Π²ΠΈΠ΄Π΅ упорядочСнного Π½Π°Π±ΠΎΡ€Π° Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ, Π·Π°Π΄Π°Π½Π½ΠΎΠ³ΠΎ нСпосрСдствСнным пСрСчислСниСм. Π’ PascalABC. NETпСрСмСнная Π΄Π°Π½Π½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Π·Π°Π½ΠΈΠΌΠ°Π΅Ρ‚ Π² ΠΏΠ°ΠΌΡΡ‚ΠΈ 4 Π±Π°ΠΉΡ‚Π°. ОбъявлСниС пСрСчислимых Ρ‚ΠΈΠΏΠΎΠ² состоит ΠΈΠ· Π΄Π²ΡƒΡ… шагов:
  • [4] описаниС ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΡΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°, Ρ‚. Π΅. ΡƒΠΊΠ°Π·Π°Π½ΠΈΠ΅ ΠΈΠΌΠ΅Π½ΠΈ Ρ‚ΠΈΠΏΠ°ΠΈ мноТСства ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Π΅ΠΌΡ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ. Оно осущСствляСтся послСзарСзСрвированного слова Π’ΡƒΡ€Π΅ ΠΈ ΠΈΠΌΠ΅Π΅Ρ‚ синтаксис имя_польз_Ρ‚ΠΈΠΏΠ° = (список_Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ);. ЗначСния Π² ΡΠΏΠΈΡΠΊΠ΅ ΡΠ²Π»ΡΡŽΡ‚ΡΡ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½Ρ‹ΠΌΠΈ константамии ΡƒΠΊΠ°Π·Ρ‹Π²Π°ΡŽΡ‚ΡΡ Ρ‡Π΅Ρ€Π΅Π· символ, (запятая). Π‘Π°ΠΌΠΈ значСнияи имя_польз_Ρ‚ΠΈΠΏΠ° Π΄ΠΎΠ»ΠΆΠ½Ρ‹ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ ΠΏΡ€Π°Π²ΠΈΠ»Π°ΠΌ составлСния ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ΠΎΠ²;
ΠŸΠΎΠΊΠ°Π·Π°Ρ‚ΡŒ вСсь тСкст
Π—Π°ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Ρ„ΠΎΡ€ΠΌΡƒ Ρ‚Π΅ΠΊΡƒΡ‰Π΅ΠΉ Ρ€Π°Π±ΠΎΡ‚ΠΎΠΉ