Π—Π°ΠΊΠ°Π·Π°Ρ‚ΡŒ курсовыС, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Ρ‹Π΅, Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚Ρ‹...
ΠžΠ±Ρ€Π°Π·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½Ρ‹Π΅ Ρ€Π°Π±ΠΎΡ‚Ρ‹ Π½Π° Π·Π°ΠΊΠ°Π·. НСдорого!

ΠŸΡ€ΠΎΡΡ‚Ρ‹Π΅ Ρ‚ΠΈΠΏΡ‹ Π΄Π°Π½Π½Ρ‹Ρ…

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

Type Operat = (Plus, Minus, Mult, Divide); Dec = 1.10; {числа ΠΎΡ‚ 1 Π΄ΠΎ 10}. ВсС символы ΠΊΠΎΠ΄Π° ASCII. ЦСлочислСнныС Ρ‚ΠΈΠΏΡ‹. Π‘hr (66) => 'B'; Succ ('C') => 'D'. Ord ('A') => 65; Pred ('C') => 'B'. Alphabet = `A'.'Z'{Π°Π»Ρ„Π°Π²ΠΈΡ‚}. ΠŸΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΡΠ΅ΠΌΡ‹ΠΉ Ρ‚ΠΈΠΏ; Π”ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ. ВСщСствСнныС Ρ‚ΠΈΠΏΡ‹; ВСщСствСнныС Ρ‚ΠΈΠΏΡ‹. CH1:= 'А'; CH2:=#65; {ΠΊΠΎΠ΄ А}. 2 147 483 648.2 147 483 647. Type Boolean = (False, True); Π‘ΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

ΠŸΡ€ΠΎΡΡ‚Ρ‹Π΅ Ρ‚ΠΈΠΏΡ‹ Π΄Π°Π½Π½Ρ‹Ρ… (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

ΠŸΡ€ΠΎΡΡ‚ΠΎΠΉ Ρ‚ΠΈΠΏ опрСдСляСт упорядочСнноС мноТСство Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Π°. Π’ Turbo Pascal ΠΈΠΌΠ΅ΡŽΡ‚ΡΡ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ Π³Ρ€ΡƒΠΏΠΏΡ‹ простых Ρ‚ΠΈΠΏΠΎΠ²:

  • Β· Ρ†Π΅Π»Ρ‹Π΅ (цСлочислСнныС) Ρ‚ΠΈΠΏΡ‹;
  • Β· вСщСствСнныС Ρ‚ΠΈΠΏΡ‹;
  • Β· логичСский Ρ‚ΠΈΠΏ;
  • Β· ΡΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ;
  • Β· пСрСчисляСмый Ρ‚ΠΈΠΏ;
  • Β· Ρ‚ΠΈΠΏ-Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½.

ВсС простыС Ρ‚ΠΈΠΏΡ‹, Π·Π° ΠΈΡΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅ΠΌ вСщСствСнных, Π½Π°Π·Ρ‹Π²Π°ΡŽΡ‚ΡΡ порядковыми Ρ‚ΠΈΠΏΠ°ΠΌΠΈ. Для Π²Π΅Π»ΠΈΡ‡ΠΈΠ½ порядковых Ρ‚ΠΈΠΏΠΎΠ² ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Ρ‹ стандартныС ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€Ρ‹ ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ: Dec, Inc, Ord, Pred, Succ.

Π’ Ρ‚Π°Π±Π». 3.2 ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Ρ‹ простыС Ρ‚ΠΈΠΏΡ‹ Π΄Π°Π½Π½Ρ‹Ρ… языка Turbo Pascal, объСм памяти, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΡ‹ΠΉ для хранСния ΠΎΠ΄Π½ΠΎΠΉ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ ΡƒΠΊΠ°Π·Π°Π½Π½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° ΠΈ ΠΌΠ½ΠΎΠΆΠ΅ΡΡ‚Π²ΠΎ допустимых Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ.

Для Ρ€Π°Π±ΠΎΡ‚Ρ‹ с ΡΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½ΠΎΠΉ ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠ΅ΠΉ Π² Turbo Pascal 7.0 ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ Π΄Π°Π½Π½Ρ‹Π΅ символьного Ρ‚ΠΈΠΏΠ° (Char).

Π’Π°Π±Π»ΠΈΡ†Π° 3.2.

ΠŸΡ€ΠΎΡΡ‚Ρ‹Π΅ Ρ‚ΠΈΠΏΡ‹ Π΄Π°Π½Π½Ρ‹Ρ… Turbo Pascal.

Π˜Π΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€

Π”Π»ΠΈΠ½Π° (Π±Π°ΠΉΡ‚).

Π”ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ.

ЦСлочислСнныС Ρ‚ΠΈΠΏΡ‹.

Integer.

— 32 768.32767.

Byte.

0.255.

Word.

0.65 535.

ShortInt.

— 128.127.

LongInt.

— 2 147 483 648.2147483647.

ВСщСствСнныС Ρ‚ΠΈΠΏΡ‹.

Real.

2,9×10−39.1,7×10+38.

Single.

1,5×10−45.3,4×10+38.

Double.

5,0×10−324.1,7×10+308.

Extended.

1,9×10−4951.1,1×10+4932.

Comp.

— 9,2×10+18.9,2×10+18.

ЛогичСский Ρ‚ΠΈΠΏ.

Boolean.

true, false.

ByteBool.

true, false.

WordBool.

true, false.

LongBool.

true, false.

Π‘ΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ.

Char.

всС символы ΠΊΠΎΠ΄Π° ASCII.

Π‘ΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ прСдставляСт собой Ρ‚ΠΈΠΏ Π΄Π°Π½Π½Ρ‹Ρ…, ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½Π½Ρ‹ΠΉ для хранСния ΠΎΠ΄Π½ΠΎΠ³ΠΎ символа ΠΈΠ· 256 символов ΠΊΠΎΠ΄Π° ASCII. Π‘ΠΈΠΌΠ²ΠΎΠ»Ρ‹ Π² Π­Π’Πœ ΠΏΡ€Π΅Π΄ΡΡ‚Π°Π²Π»ΡΡŽΡ‚ΡΡ Π΄Π²ΠΎΠΈΡ‡Π½Ρ‹ΠΌΠΈ ΠΊΠΎΠ΄Π°ΠΌΠΈ. Для латинских Π±ΡƒΠΊΠ² ΠΊΠΎΠ΄Ρ‹ упорядочСны ΠΏΠΎ Π²ΠΎΠ·Ρ€Π°ΡΡ‚Π°Π½ΠΈΡŽ Π² ΡΠΎΠΎΡ‚вСтствии ΠΈΡ… Ρ€Π°ΡΠΏΠΎΠ»ΠΎΠΆΠ΅Π½ΠΈΠ΅ΠΌ Π² Π°Π»Ρ„Π°Π²ΠΈΡ‚Π΅ ΠΎΡ‚ 'А' Π΄ΠΎ 'Z', ΠΎΡ‚ 'a' Π΄ΠΎ 'z'.

Π—Π°Π΄Π°ΡŽΡ‚ΡΡ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Π΅ символьного Ρ‚ΠΈΠΏΠ° ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ:

CH1:= 'А'; CH2:=#65; {код А}.

К Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π°ΠΌ символьного Ρ‚ΠΈΠΏΠ° ΠΏΡ€ΠΈΠΌΠ΅Π½ΠΈΠΌΡ‹ всС ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΈ 4 Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ, ΠΏΠΎΠ·Π²ΠΎΠ»ΡΡŽΡ‰ΠΈΠ΅ Ρ€Π°Π±ΠΎΡ‚Π°Ρ‚ΡŒ с ΡΠΈΠΌΠ²ΠΎΠ»Π°ΠΌΠΈ:

Ord (символ) — вычисляСт порядковый Π½ΠΎΠΌΠ΅Ρ€ (ΠΊΠΎΠ΄) символа;

Chr (ΠΊΠΎΠ΄) — опрСдСляСт символ с Π·Π°Π΄Π°Π½Π½Ρ‹ΠΌ ΠΊΠΎΠ΄ΠΎΠΌ;

Pred (символ) — опрСдСляСт символ, ΠΈΠΌΠ΅ΡŽΡ‰ΠΈΠΉ ΠΊΠΎΠ΄, ΠΏΡ€Π΅Π΄ΡˆΠ΅ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΉ Π΄Π°Π½Π½ΠΎΠΌΡƒ;

Succ (символ) — опрСдСляСт символ, ΠΈΠΌΠ΅ΡŽΡ‰ΠΈΠΉ ΠΊΠΎΠ΄, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° Π΄Π°Π½Π½Ρ‹ΠΌ.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€.

Ord ('A') => 65; Pred ('C') => 'B'.

Π‘hr (66) => 'B'; Succ ('C') => 'D'.

Для Π»ΠΈΡ‚Π΅Ρ€ ΠΈΠ· ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»Π° 'a'.'z' ΠΏΡ€ΠΈΠΌΠ΅Π½ΠΈΠΌΠ° функция UpCase©, которая ΠΏΠ΅Ρ€Π΅Π²ΠΎΠ΄ΠΈΡ‚ эти Π»ΠΈΡ‚Π΅Ρ€Ρ‹ Π² Π²Π΅Ρ€Ρ…Π½ΠΈΠΉ рСгистр 'A'.'Z'.

ΠŸΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΡΠ΅ΠΌΡ‹ΠΉ Ρ‚ΠΈΠΏ Π½Π΅ ΡΠ²Π»ΡΠ΅Ρ‚ся стандартным ΠΈ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΠ΅Ρ‚ся Π½Π°Π±ΠΎΡ€ΠΎΠΌ ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ΠΎΠ², с ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΌΠΈ ΠΌΠΎΠ³ΡƒΡ‚ ΡΠΎΠ²ΠΏΠ°Π΄Π°Ρ‚ΡŒ значСния ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Π°. Бписок ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ΠΎΠ² указываСтся Π² ΠΊΡ€ΡƒΠ³Π»Ρ‹Ρ… скобках, ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹ Ρ€Π°Π·Π΄Π΅Π»ΡΡŽΡ‚ΡΡ запятыми:

type.

= ();).

Π’Π°ΠΆΠ½ΠΎ, Π² ΠΊΠ°ΠΊΠΎΠΌ порядкС пСрСчислСны ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹ ΠΏΡ€ΠΈ ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠΈ Ρ‚ΠΈΠΏΠ°, Ρ‚. ΠΊ. ΠΏΠ΅Ρ€Π²ΠΎΠΌΡƒ ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρƒ присваиваСтся порядковый Π½ΠΎΠΌΠ΅Ρ€ 0, Π²Ρ‚ΠΎΡ€ΠΎΠΌΡƒ — 1 ΠΈ Ρ‚. Π΄.

Один ΠΈ Ρ‚ΠΎΡ‚ ΠΆΠ΅ ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚ΡŒ Π² ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠΈ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ ΠΎΠ΄Π½ΠΎΠ³ΠΎ пСрСчисляСмого Ρ‚ΠΈΠΏΠ°. Ѐункция Ord ΠΎΡ‚ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ пСрСчисляСмого Ρ‚ΠΈΠΏΠ° Π΄Π°Π΅Ρ‚ порядковый Π½ΠΎΠΌΠ΅Ρ€ Π΅Π΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΡ.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€.

type Operat = (Plus, Minus, Mult, Divide);

ЛогичСский Ρ‚ΠΈΠΏ являСтся частным случаСм пСрСчисляСмого:

type Boolean = (False, True);

Π’ Π»ΡŽΠ±ΠΎΠΌ порядковом Ρ‚ΠΈΠΏΠ΅ ΠΌΠΎΠΆΠ½ΠΎ Π²Ρ‹Π΄Π΅Π»ΠΈΡ‚ΡŒ подмноТСство Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ, опрСдСляСмоС ΠΌΠΈΠ½ΠΈΠΌΠ°Π»ΡŒΠ½Ρ‹ΠΌ ΠΈ ΠΌΠ°ΠΊΡΠΈΠΌΠ°Π»ΡŒΠ½Ρ‹ΠΌ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ΠΌ, Π² ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ΅ входят всС значСния исходного Ρ‚ΠΈΠΏΠ°, находящиСся Π² ΡΡ‚ΠΈΡ… Π³Ρ€Π°Π½ΠΈΡ†Π°Ρ…, Π²ΠΊΠ»ΡŽΡ‡Π°Ρ ΠΈ ΡΠ°ΠΌΠΈ Π³Ρ€Π°Π½ΠΈΡ†Ρ‹. Π’Π°ΠΊΠΎΠ΅ подмноТСство опрСдСляСт Ρ‚ΠΈΠΏ-Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½. Π’ΠΈΠΏ-Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ задаСтся ΡƒΠΊΠ°Π·Π°Π½ΠΈΠ΅ΠΌ минимального ΠΈ ΠΌΠ°ΠΊΡΠΈΠΌΠ°Π»ΡŒΠ½ΠΎΠ³ΠΎ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ, Ρ€Π°Π·Π΄Π΅Π»Π΅Π½Π½Ρ‹Ρ… двумя Ρ‚ΠΎΡ‡ΠΊΠ°ΠΌΠΈ:

type =.. ;

МинимальноС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΈ ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠΈ Ρ‚Π°ΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Π½Π΅ Π΄ΠΎΠ»ΠΆΠ½ΠΎ Π±Ρ‹Ρ‚ΡŒ большС максимального.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€.

type.

Dec = 1.10; {числа ΠΎΡ‚ 1 Π΄ΠΎ 10}.

Alphabet = `A'.'Z'{Π°Π»Ρ„Π°Π²ΠΈΡ‚}.

ΠŸΠΎΠΊΠ°Π·Π°Ρ‚ΡŒ вСсь тСкст
Π—Π°ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Ρ„ΠΎΡ€ΠΌΡƒ Ρ‚Π΅ΠΊΡƒΡ‰Π΅ΠΉ Ρ€Π°Π±ΠΎΡ‚ΠΎΠΉ