ΠŸΠΎΠΌΠΎΡ‰ΡŒ Π² написании студСнчСских Ρ€Π°Π±ΠΎΡ‚
АнтистрСссовый сСрвис

ΠžΡΠ½ΠΎΠ²Ρ‹ программирования Π½Π° языкС Паскаль

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

Π’Π½ΠΈΠΌΠ°Ρ‚Π΅Π»ΡŒΠ½ΠΎ ΠΏΡ€ΠΎΡ‡ΠΈΡ‚Π°ΠΉΡ‚Π΅ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΉ Ρ€Π°Π·Π΄Π΅Π» Ρ‚Π΅ΠΎΡ€ΠΈΠΈ (ΠΎΠ΄Π½Ρƒ Π³Π»Π°Π²Ρƒ), Ρ€Π°Π·Π±Π΅Ρ€ΠΈΡ‚Π΅ всС ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π²Π°ΠΌ всС Π±Ρ‹Π»ΠΎ понятно, ΠΏΡ€ΠΈ этом, Ссли Ρƒ Π²Π°Ρ Π΅ΡΡ‚ΡŒ ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€, Π½Π°Π±Π΅Ρ€ΠΈΡ‚Π΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ΠΈ Π·Π°ΠΏΡƒΡΡ‚ΠΈΡ‚Π΅ ΠΈΡ… Π½Π° Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅. Π£Π±Π΅Π΄ΠΈΡ‚Π΅ΡΡŒ Π² ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎΡΡ‚ΠΈ ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½Ρ‹Ρ… Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ². Для Ρ‚ΠΎΠ³ΠΎ Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΈΠ·ΡƒΡ‡ΠΈΡ‚ΡŒ дСйствиС Ρ‚ΠΎΠ³ΠΎ ΠΈΠ»ΠΈ ΠΈΠ½ΠΎΠ³ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ ΠΈΠ»ΠΈ Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, ΠΌΠΎΠΆΠ½ΠΎ «ΡƒΠ΄Π°Π»ΠΈΡ‚ΡŒ» Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚, Π·Π°ΠΊΠ»ΡŽΡ‡ΠΈΠ² Π΅Π³ΠΎ… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

ΠžΡΠ½ΠΎΠ²Ρ‹ программирования Π½Π° языкС Паскаль (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

Как Ρ€Π°Π±ΠΎΡ‚Π°Ρ‚ΡŒ с ΠΊΠ½ΠΈΠ³ΠΎΠΉ

Π’Π½ΠΈΠΌΠ°Ρ‚Π΅Π»ΡŒΠ½ΠΎ ΠΏΡ€ΠΎΡ‡ΠΈΡ‚Π°ΠΉΡ‚Π΅ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΉ Ρ€Π°Π·Π΄Π΅Π» Ρ‚Π΅ΠΎΡ€ΠΈΠΈ (ΠΎΠ΄Π½Ρƒ Π³Π»Π°Π²Ρƒ), Ρ€Π°Π·Π±Π΅Ρ€ΠΈΡ‚Π΅ всС ΠΏΡ€ΠΈΠΌΠ΅Ρ€Ρ‹, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π²Π°ΠΌ всС Π±Ρ‹Π»ΠΎ понятно, ΠΏΡ€ΠΈ этом, Ссли Ρƒ Π²Π°Ρ Π΅ΡΡ‚ΡŒ ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€, Π½Π°Π±Π΅Ρ€ΠΈΡ‚Π΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ΠΈ Π·Π°ΠΏΡƒΡΡ‚ΠΈΡ‚Π΅ ΠΈΡ… Π½Π° Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅. Π£Π±Π΅Π΄ΠΈΡ‚Π΅ΡΡŒ Π² ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎΡΡ‚ΠΈ ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½Ρ‹Ρ… Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ². Для Ρ‚ΠΎΠ³ΠΎ Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΈΠ·ΡƒΡ‡ΠΈΡ‚ΡŒ дСйствиС Ρ‚ΠΎΠ³ΠΎ ΠΈΠ»ΠΈ ΠΈΠ½ΠΎΠ³ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ ΠΈΠ»ΠΈ Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚Π° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, ΠΌΠΎΠΆΠ½ΠΎ «ΡƒΠ΄Π°Π»ΠΈΡ‚ΡŒ» Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚, Π·Π°ΠΊΠ»ΡŽΡ‡ΠΈΠ² Π΅Π³ΠΎ Π² ΠΊΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€Π½Ρ‹Π΅ скобки { Ρ„Ρ€Π°Π³ΠΌΠ΅Π½Ρ‚ … }. ΠΌΠΎΠΆΠ½ΠΎ, Π½Π°ΠΎΠ±ΠΎΡ€ΠΎΡ‚, Π΄ΠΎΠ±Π°Π²ΠΈΡ‚ΡŒ Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹ writeln, readln для Ρ‚ΠΎΠ³ΠΎ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΠΎΡΠΌΠΎΡ‚Ρ€Π΅Ρ‚ΡŒ ΠΏΡ€ΠΎΠΌΠ΅ΠΆΡƒΡ‚ΠΎΡ‡Π½Ρ‹Π΅ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹. ЭкспСримСнтируйтС — это ΠΏΠΎΠΌΠΎΠΆΠ΅Ρ‚ Π²Π°ΠΌ Π² ΡƒΡΠ²ΠΎΠ΅Π½ΠΈΠΈ ΠΌΠ°Ρ‚Π΅Ρ€ΠΈΠ°Π»Π°.

Если Ρƒ Π²Π°Ρ Π½Π΅Ρ‚ ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π°, Π±ΡƒΠ΄ΡŒΡ‚Π΅ сами «ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€ΠΎΠΌ» ΠΈ «Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠΉΡ‚Π΅» ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹, записывая Π½Π° Π»ΠΈΡΡ‚Π΅ Π±ΡƒΠΌΠ°Π³ΠΈ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹. Π­Ρ‚ΠΎ ΠΏΠΎΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΠΎΠ½ΡΡ‚ΡŒ Π²Π°ΠΌ ΠΈΡ… Ρ€Π°Π±ΠΎΡ‚Ρƒ.

Π˜Π·ΡƒΡ‡ΠΈΠ² ΠΌΠ°Ρ‚Π΅Ρ€ΠΈΠ°Π», ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚Π΅ свой Π²Π°Ρ€ΠΈΠ°Π½Ρ‚ ΠΈ Π½Π°ΠΏΠΈΡˆΠΈΡ‚Π΅ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΡƒΡŽ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ, ΠΏΡ€ΠΎΠ²Π΅Ρ€ΡŒΡ‚Π΅ Π΅Π΅ Π½Π° ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π΅ (ΠΈΠ»ΠΈ Π±Π΅Π· Π½Π΅Π³ΠΎ). ΠžΡ„ΠΎΡ€ΠΌΠΈΡ‚Π΅ ΠΎΡ‚Ρ‡Π΅Ρ‚, сдайтС Π½Π° ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΊΡƒ ΠΏΡ€Π΅ΠΏΠΎΠ΄Π°Π²Π°Ρ‚Π΅Π»ΡŽ.

Если Π²Ρ‹ Π±ΡƒΠ΄Π΅Ρ‚Π΅ Π²Π½ΠΈΠΌΠ°Ρ‚Π΅Π»ΡŒΠ½ΠΎ Ρ€Π°Π·Π±ΠΈΡ€Π°Ρ‚ΡŒ тСксты ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ, Π·Π°Ρ‚Π΅ΠΌ, Π·Π°ΡƒΡ‡ΠΈΠ² тСкст, ΠΏΠΎΠΏΡ€ΠΎΠ±ΡƒΠ΅Ρ‚Π΅ Π΅Π³ΠΎ Π½Π°ΠΏΠΈΡΠ°Ρ‚ΡŒ ΠΏΠΎ ΠΏΠ°ΠΌΡΡ‚ΠΈ, ΠΏΡ€ΠΎΠ²Π΅Ρ€ΠΈΡ‚ΡŒ, ΠΈΡΠΏΡ€Π°Π²ΠΈΡ‚ΡŒ ошибки, Π·Π°ΠΏΡƒΡΡ‚ΠΈΡ‚ΡŒ Π½Π° ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π΅, ΠΏΠΎΠ»ΡƒΡ‡ΠΈΡ‚ΡŒ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹, Ρ‚ΠΎ Π²Ρ‹ Π½Π°ΡƒΡ‡ΠΈΡ‚Π΅ΡΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Ρ‚ΡŒ!

ΠŸΠΎΠΌΠ½ΠΈΡ‚Π΅: «Π½Π΅ Π±ΠΎΠ³ΠΈ Π³ΠΎΡ€ΡˆΠΊΠΈ ΠΎΠ±ΠΆΠΈΠ³Π°ΡŽΡ‚!»

Π£Π΄Π°Ρ‡ΠΈ Π²Π°ΠΌ!

Автор.

1. ΠŸΡ€Π΅Π΄Π²Π°Ρ€ΠΈΡ‚Π΅Π»ΡŒΠ½Ρ‹Π΅ свСдСния

Бмысл программирования состоит Π² Ρ‚ΠΎΠΌ, Ρ‡Ρ‚ΠΎ программист Π΄ΠΎΠ»ΠΆΠ΅Π½ ΠΎΠ±ΡŠΡΡΠ½ΠΈΡ‚ΡŒ Π­Π’Πœ, ΠΊΠ°ΠΊΠΈΠ΅ дСйствия машина Π΄ΠΎΠ»ΠΆΠ½Π° Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Ρ€Π΅ΡˆΠΈΡ‚ΡŒ Π½ΡƒΠΆΠ½ΡƒΡŽ Π·Π°Π΄Π°Ρ‡Ρƒ. Π­Ρ‚ΠΎ объяснСниС Π΄ΠΎΠ»ΠΆΠ½ΠΎ Π±Ρ‹Ρ‚ΡŒ сформулировано Π½Π° Π΄ΠΎΡΡ‚ΡƒΠΏΠ½ΠΎΠΌ для Π­Π’Πœ языкС ΠΈ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ΡŒ указания, ΠΊΠ°ΠΊΠΈΠ΅ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ Π±ΡƒΠ΄ΡƒΡ‚ исходными для Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ, ΠΊΠ°ΠΊΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΈ Π² ΠΊΠ°ΠΊΠΎΠΉ ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΡΡ‚ΠΈ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ Π½Π°Π΄ Π²Ρ…ΠΎΠ΄Π½Ρ‹ΠΌΠΈ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π°ΠΌΠΈ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΠΎΠ»ΡƒΡ‡ΠΈΡ‚ΡŒ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈ, Π½Π°ΠΊΠΎΠ½Π΅Ρ†, Π² ΠΊΠ°ΠΊΠΎΠΌ Π²ΠΈΠ΄Π΅ Π²Ρ‹Π΄Π°Ρ‚ΡŒ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚. Алгоритм, записанный Π² Ρ‚Π΅Ρ€ΠΌΠΈΠ½Π°Ρ… языка, понятного Π­Π’Πœ, называСтся ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΎΠΉ.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ Паскаль состоит ΠΈΠ· «Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΊΠ°» ΠΈ «Ρ‚Π΅Π»Π°» ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, Π½Π°Π·Ρ‹Π²Π°Π΅ΠΌΡ‹ΠΌ Π±Π»ΠΎΠΊΠΎΠΌ. Π’ «Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΊΠ΅» ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ даётся имя ΠΈ ΠΏΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΡΡŽΡ‚ся Π΅Ρ‘ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Ρ‹ (Ссли это Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ). Π‘Π»ΠΎΠΊ состоит ΠΈΠ· ΡˆΠ΅ΡΡ‚ΠΈ Ρ€Π°Π·Π΄Π΅Π»ΠΎΠ², ΠΏΡ€ΠΈΡ‡Π΅ΠΌ любой ΠΈΠ· Π½ΠΈΡ…, ΠΊΡ€ΠΎΠΌΠ΅ послСднСго, ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ пустым (Ρ‚.Π΅. ΠΎΡ‚ΡΡƒΡ‚ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ). Π’ ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠΈ Π±Π»ΠΎΠΊΠ° Ρ€Π°Π·Π΄Π΅Π»Ρ‹ Π΄ΠΎΠ»ΠΆΠ½Ρ‹ ΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚ΡŒ Π² Ρ‚Π°ΠΊΠΎΠΌ порядкС: описаниС ΠΌΠ΅Ρ‚ΠΎΠΊ, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ констант, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ Ρ‚ΠΈΠΏΠΎΠ², описаниС ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…, описаниС ΠΏΡ€ΠΎΡ†Π΅Π΄ΡƒΡ€ ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ, ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹.

1.1. Алфавит

Для написания ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ Паскаль ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ символы: Π±ΡƒΠΊΠ²Ρ‹ латинского Π°Π»Ρ„Π°Π²ΠΈΡ‚Π° a b c d… z (прописныС), a b c d… z (строчныС), Π·Π½Π°ΠΊ подчСркивания. ΠŸΡ€ΠΎΠΏΠΈΡΠ½Ρ‹Π΅ ΠΈ ΡΡ‚Ρ€ΠΎΡ‡Π½Ρ‹Π΅ Π±ΡƒΠΊΠ²Ρ‹ взаимозамСняСмы (эквивалСнтны) ΠΈ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ся для Π±ΠΎΠ»Π΅Π΅ Ρ€Π΅Π»ΡŒΠ΅Ρ„Π½ΠΎΠ³ΠΎ написания ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ;

Ρ†ΠΈΡ„Ρ€Ρ‹ 0 1 2 3 4 5 6 7 8 9;

ΡΠΏΠ΅Ρ†ΠΈΠ°Π»ΡŒΠ½Ρ‹Π΅ Π·Π½Π°ΠΊΠΈ: + - * / = < > [ ]. , ():; ^ { } $ # @;

составныС Π·Π½Π°ΠΊΠΈ :< = > =. (* *) (.).

Π˜ΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡ символы Π°Π»Ρ„Π°Π²ΠΈΡ‚Π°, ΠΌΡ‹ ΠΌΠΎΠΆΠ΅ΠΌ Π·Π°ΠΏΠΈΡΠ°Ρ‚ΡŒ Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌ Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ Паскаль. Π‘Π»Π΅Π΄ΡƒΠ΅Ρ‚ ΠΎΡ‚ΠΌΠ΅Ρ‚ΠΈΡ‚ΡŒ, Ρ‡Ρ‚ΠΎ ΠΊΡ€ΠΎΠΌΠ΅ ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π½Ρ‹Ρ… Π²Ρ‹ΡˆΠ΅ символов Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΠΈ Π±ΡƒΠΊΠ²Ρ‹ ΠΊΠΈΡ€ΠΈΠ»Π»ΠΈΡ†Ρ‹, Ρ‚. Π΅. русский Π°Π»Ρ„Π°Π²ΠΈΡ‚, ΠΎΠ΄Π½Π°ΠΊΠΎ Π² ΠΊΠΎΠ½ΡΡ‚рукциях языка эти Π±ΡƒΠΊΠ²Ρ‹ Π½Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Ρ‹, ΠΎΠ½ΠΈ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ для написания тСкстовых констант, ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΡ… Π΄Π°Π½Π½Ρ‹ΠΌ строкового Ρ‚ΠΈΠΏΠ°, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€: 'Ρ‚Π°Π±Π». 1'.

1.2. РСшСниС Π·Π°Π΄Π°Ρ‡

Π’ ΠΏΠ΅Ρ€Π²ΠΎΠΌ ΠΏΡ€ΠΈΠ±Π»ΠΈΠΆΠ΅Π½ΠΈΠΈ Ρ€Π΅ΡˆΠ΅Π½ΠΈΠ΅ Π·Π°Π΄Π°Ρ‡ΠΈ Π½Π° Π­Π’Πœ сводится: ΠΊ Π²Π²ΠΎΠ΄Ρƒ Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… исходных Π΄Π°Π½Π½Ρ‹Ρ… Π² ΠΏΠ°ΠΌΡΡ‚ΡŒ ΠΌΠ°ΡˆΠΈΠ½Ρ‹ ΠΈ ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠ΅ ΠΈΡ… ΠΏΠΎ Π·Π°Π΄Π°Π½Π½ΠΎΠΌΡƒ Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΡƒ; ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½ΠΈΡŽ ΠΈ Π²Ρ‹Π΄Π°Ρ‡Π΅ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŽ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ Π² Π²ΠΈΠ΄Π΅ чисСл, тСкстов, Π³Ρ€Π°Ρ„ΠΈΠΊΠΎΠ² Ρ‚Π°Π±Π»ΠΈΡ† ΠΈ Ρ‚. ΠΏ. Алгоритм являСтся ΠΏΠ΅Ρ€Π΅Ρ‡Π½Π΅ΠΌ Ρ‚Π΅Ρ… дСйствий, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π΄ΠΎΠ»ΠΆΠ½Π° Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡ‚ΡŒ Π­Π’Πœ для получСния Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π°. Π’Π²ΠΎΠ΄ Π΄Π°Π½Π½Ρ‹Ρ… ΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΡ€ΠΎΠΈΠ·Π²ΠΎΠ΄ΠΈΡ‚ΡŒΡΡ с Ρ€Π°Π·Π»ΠΈΡ‡Π½Ρ‹Ρ… устройств: с ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹, ΠΊΠ°Π½Π°Π»Π° связи, сканСра (Π²Π²ΠΎΠ΄ тСкстов ΠΈ Ρ€ΠΈΡΡƒΠ½ΠΊΠΎΠ²), манипулятора Ρ‚ΠΈΠΏΠ° «ΠΌΡ‹ΡˆΡŒ», «Π΄ΠΆΠΎΠΉΡΡ‚ΠΈΠΊ» ΠΈ Ρ‚. Π΄.

Π’Ρ‹Π²ΠΎΠ΄ осущСствляСтся Π½Π° ΡƒΡΡ‚ройства отобраТСния — экран ΠΌΠΎΠ½ΠΈΡ‚ΠΎΡ€Π°, ΠΏΠ΅Ρ‡Π°Ρ‚Π°ΡŽΡ‰Π΅Π΅ устройство, Π³Ρ€Π°Ρ„ΠΎΠΏΠΎΡΡ‚Ρ€ΠΎΠΈΡ‚Π΅Π»ΡŒ ΠΈ Ρ‚. Π΄.

Π’Π½Π°Ρ‡Π°Π»Π΅ Π² Π­Π’Πœ вводится ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ°, содСрТащая описания исходных Π΄Π°Π½Π½Ρ‹Ρ…, пСрСчня ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ², ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΡŽΡ‚ порядок ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ этих Π΄Π°Π½Π½Ρ‹Ρ… ΠΈ ΠΈΡ… ΠΏΡ€Π΅ΠΎΠ±Ρ€Π°Π·ΠΎΠ²Π°Π½ΠΈΠ΅ Π² Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹ (Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌ).

ΠŸΠΎΡ€ΡΠ΄ΠΎΠΊ Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡:

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

2. Π Π°Π·Ρ€Π°Π±ΠΎΡ‚ΠΊΠ° Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ. Π—Π΄Π΅ΡΡŒ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ описаниС Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° Π² Π»ΡŽΠ±ΠΎΠΉ ΡƒΠ΄ΠΎΠ±Π½ΠΎΠΉ Ρ„ΠΎΡ€ΠΌΠ΅: Π»ΠΈΠ±ΠΎ Π² Π²ΠΈΠ΄Π΅ словСсного описания с Π²ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅ΠΌ Ρ„ΠΎΡ€ΠΌΡƒΠ», Π»ΠΈΠ±ΠΎ Π² Π²ΠΈΠ΄Π΅ Π±Π»ΠΎΠΊ-схСм, Ρ‡Ρ‚ΠΎ особСнно наглядно ΠΈ ΡƒΠ΄ΠΎΠ±Π½ΠΎ. Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, Π±Π»ΠΎΠΊ-схСма Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ°, ΠΈΡΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π³ΠΎ ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚Π½ΠΎΠ΅ ΡƒΡ€Π°Π²Π½Π΅Π½ΠΈΠ΅ ax2+bx+c=0, ΠΏΠΎΠΊΠ°Π·Π°Π½Π° Π½Π° Ρ€ΠΈΡ. 2.1.

3. Π—Π°ΠΏΠΈΡΡŒ Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ срСдств алгоритмичСского языка Паскаль (написаниС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹).

4. Π’Π²ΠΎΠ΄ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π² Π­Π’Πœ.

5. ΠšΠΎΠΌΠΏΠΈΠ»ΡΡ†ΠΈΡ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, Ρ‚. Π΅. ΠΏΠ΅Ρ€Π΅Π²ΠΎΠ΄ Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° ΠΈΠ· Ρ‚Π΅Ρ€ΠΌΠΈΠ½ΠΎΠ² языка Паскаль Π²ΠΎ Π²Π½ΡƒΡ‚Ρ€Π΅Π½Π½ΠΈΠΉ язык Π­Π’Πœ, ΠΏΠΎΡΠΊΠΎΠ»ΡŒΠΊΡƒ алгоритмичСских языков — мноТСство, Π° Π²Π½ΡƒΡ‚Ρ€Π΅Π½Π½ΠΈΠΉ язык Π­Π’Πœ — ΠΎΠ΄ΠΈΠ½.

6. Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π½Π° Π­Π’Πœ: Ссли ΠΎΠ½Π° написана Π±Π΅Π· ошибок, Ρ‚ΠΎ Π½Π° ΡΡ‚ΠΎΠΌ этапС Π­Π’Πœ, встрСтив ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Π²Π²ΠΎΠ΄Π° исходных Π΄Π°Π½Π½Ρ‹Ρ…, запросит ΠΊΠΎΠ½ΠΊΡ€Π΅Ρ‚Π½Ρ‹Π΅ исходныС Π΄Π°Π½Π½Ρ‹Π΅ для Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ, ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒ Π²Π²Π΅Π΄Π΅Ρ‚ эти Π΄Π°Π½Π½Ρ‹Π΅, машина ΠΈΡ… ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚Π°Π΅Ρ‚ ΠΈ Π²Ρ‹Π΄Π°ΡΡ‚ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚.

НС Π²ΡΠ΅Π³Π΄Π° Ρ€Π΅ΡˆΠ΅Π½ΠΈΠ΅ получаСтся с ΠΏΠ΅Ρ€Π²ΠΎΠ³ΠΎ Ρ€Π°Π·Π°. ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΌΠΎΠΆΠ΅Ρ‚ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ΡŒ ошибки (Π½Π΅ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½Π°Ρ запись ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² — синтаксичСскиС ошибки; Π½Π΅ Ρ‚ΠΎΡ‚ Ρ‚ΠΈΠΏ Π²Ρ‹Π΄Π΅Π»Π΅Π½Π½Ρ‹Ρ… ячССк памяти, Ρ‡Ρ‚ΠΎ Π²Π²ΠΎΠ΄ΠΈΠΌΡ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅, ΠΏΡƒΡ‚Π°Π½ΠΈΡ†Π° Π² Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ΅; ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½Ρ‹Π΅ Π΄Π°Π½Π½Ρ‹Π΅ Π½Π΅ ΡΠΎΠ²ΠΏΠ°Π΄Π°ΡŽΡ‚ с Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π°ΠΌΠΈ ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½ΠΎΠ³ΠΎ просчСта ΠΈ Ρ‚. Π΄.). Π’ ΡΡ‚ΠΎΠΌ случаС Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌ процСсс ΠΎΡ‚Π»Π°Π΄ΠΊΠΈ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ ΠΈ ΠΏΠΎΠΈΡΠΊ ошибок. Π’ ΠŸΠ°ΡΠΊΠ°Π»Π΅ имССтся ΠΌΠΎΡ‰Π½Ρ‹ΠΉ ΠΎΡ‚Π»Π°Π΄Ρ‡ΠΈΠΊ, ΠΈ Π­Π’Πœ ΠΌΠΎΠΆΠ΅Ρ‚ Π·Π½Π°Ρ‡ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ ΠΏΠΎΠΌΠΎΡ‡ΡŒ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŽ Π² ΠΏΠΎΠΈΡΠΊΠ΅ ошибок.

2. ΠŸΡ€ΠΎΡΡ‚Π΅ΠΉΡˆΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

2.1. ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ присваивания

Π˜Π΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€: = Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅. Π—Π΄Π΅ΡΡŒ ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ — имя ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ, пСрСмСнная хранится Π² ΡΡ‡Π΅ΠΉΠΊΠ΅ памяти с ΠΈΠΌΠ΅Π½Π΅ΠΌ — ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€. Ρ‚ΠΈΠΏ ячСйки памяти ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ описаний. Π’Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ арифмСтичСским, логичСским ΠΈΠ»ΠΈ ΠΊΠ°ΠΊΠΈΠΌ-Π»ΠΈΠ±ΠΎ Π΄Ρ€ΡƒΠ³ΠΈΠΌ, Π² ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΌ ΡƒΠΆΠ΅ извСстны (ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Ρ‹) всС входящиС Π² Π΅Π³ΠΎ состав ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅ 1. Π’ΠΈΠΏ значСния выраТСния ΠΈ Ρ‚ΠΈΠΏ ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Π° Π΄ΠΎΠ»ΠΆΠ½Ρ‹ ΡΠΎΠ²ΠΏΠ°Π΄Π°Ρ‚ΡŒ, ΠΈΠ½Π°Ρ‡Π΅ error — ошибка.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅ 2. ΠŸΡ€ΠΈ Π½Π°Π»ΠΈΡ‡ΠΈΠΈ хотя Π±Ρ‹ ΠΎΠ΄Π½ΠΎΠΉ ошибки ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π½Π΅ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€. ΠŸΡƒΡΡ‚ΡŒ ΠΈΠΌΠ΅ΡŽΡ‚ΡΡ ячСйки памяти с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ a, b, c; ячСйки Ρ‚Π°ΠΊΠΎΠ²Ρ‹, Ρ‡Ρ‚ΠΎ Π² Π½ΠΈΡ… ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΠΏΠΎΠΌΠ΅Ρ‰Π΅Π½Ρ‹ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Ρ†Π΅Π»ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°. достигаСтся это описаниСм: Var a, d, c: integer, Π³Π΄Π΅ Var — Π½Π°Ρ‡Π°Π»ΠΎ Ρ€Π°Π·Π΄Π΅Π»Π° описания ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…, a, b, c — ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹. Integer ΠΎΠ·Π½Π°Ρ‡Π°Π΅Ρ‚ Ρ†Π΅Π»Ρ‹ΠΉ, Ρ‚. Π΅. Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Var ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹ (ΠΈΠΌΠ΅Π½Π°) ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Ρ‹ ΠΊΠ°ΠΊ Ρ†Π΅Π»Ρ‹Π΅.

Π Π°Π±ΠΎΡ‚Π° описания: встрСтив Ρ‚Π°ΠΊΠΎΠ΅ описаниС, Π­Π’Πœ Π²Ρ‹Π΄Π°Ρ‘Ρ‚ Ρ‚Ρ€ΠΈ ячСйки памяти с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ a, b, c, ΠΏΡ€ΠΈΡ‡Π΅ΠΌ Ρ‚Π°ΠΊΠΈΠ΅, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Ρ‚ΡƒΠ΄Π° ΠΌΠΎΠ³Π»ΠΈ Π±Ρ‹Ρ‚ΡŒ ΠΏΠΎΠΌΠ΅Ρ‰Π΅Π½Ρ‹ Ρ†Π΅Π»Ρ‹Π΅ числа. Π—Π°ΠΏΠΈΡˆΠ΅ΠΌ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ присваивания:

a: = c+b;

Π Π°Π±ΠΎΡ‚Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°: машина Π΄ΠΎΠ»ΠΆΠ½Π° ΠΈΠΌΠ΅Ρ‚ΡŒ описаниС ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ΠΎΠ² a, b, c.

ΠΊΡ€ΠΎΠΌΠ΅ Ρ‚ΠΎΠ³ΠΎ, ΠΊΠ°ΠΊ сказано Π²Ρ‹ΡˆΠ΅, Π² ΠΏΡ€Π°Π²ΠΎΠΉ части ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° стоят Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΌ ΡƒΠΆΠ΅ присвоСны Π½Π°Ρ‡Π°Π»ΡŒΠ½Ρ‹Π΅ значСния. Π’ ΡΡ‚ΠΎΠΌ случаС машина ΠΈΠ·Π²Π»Π΅Ρ‡Π΅Ρ‚ ΠΈΠ· ΡΡ‡Π΅ΠΉΠΊΠΈ с Π΅Ρ‘ ΡΠΎΠ΄Π΅Ρ€ΠΆΠΈΠΌΠΎΠ΅ ΠΈ ΠΈΠ· ΡΡ‡Π΅ΠΉΠΊΠΈ b содСрТимоС, ΠΏΡ€ΠΎΠΈΠ·Π²Π΅Π΄Π΅Ρ‚ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΡŽ слоТСния ΠΈ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π° занСсёт (присвоит) Π² ΡΡ‡Π΅ΠΉΠΊΡƒ a.

2.2. ΠΊΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠΈ

Π’Π²Π΅Π΄Π΅ΠΌ понятиС коммСнтария. ΠšΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠΉ — это всё, Ρ‡Ρ‚ΠΎ Π·Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΎ ΠΌΠ΅ΠΆΠ΄Ρƒ скобками { }. Π‘ΠΈΠΌΠ²ΠΎΠ»Ρ‹, Π·Π°ΠΊΠ»ΡŽΡ‡Π΅Π½Π½Ρ‹Π΅ ΠΌΠ΅ΠΆΠ΄Ρƒ этими скобками, Π½Π΅ Π²ΠΎΡΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°ΡŽΡ‚ся машиной, Π½ΠΎ Π²Ρ‹Π΄Π°ΡŽΡ‚ся ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŽ. ΠšΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠΈ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΌ для объяснСния Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ°.

2.3. ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ°

НапишСм ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ вычислСния a = c+b. ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° начинаСтся с Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΊΠ° Program — имя ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹; Π·Π°Ρ‚Π΅ΠΌ ΠΈΠ΄ΡƒΡ‚ Ρ€Π°Π·Π΄Π΅Π»Ρ‹ описаний (Π΄ΠΎ 5) ΠΈ Ρ€Π°Π·Π΄Π΅Π» ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ², ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ начинаСтся словом Begin ΠΈ Π·Π°ΠΊΠ°Π½Ρ‡ΠΈΠ²Π°Π΅Ρ‚ся END. (end с Ρ‚ΠΎΡ‡ΠΊΠΎΠΉ, Ρ‚ΠΎΡ‡ΠΊΠ° — ΠΊΠΎΠ½Π΅Ρ† ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹). КаТдоС описаниС ΠΈ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Π·Π°ΠΊΠ°Π½Ρ‡ΠΈΠ²Π°ΡŽΡ‚ΡΡ символом ';'

Program Prim1; {Π·Π°Π³ΠΎΠ»ΠΎΠ²ΠΎΠΊ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹}

Var a, b, c:integer; {Ρ€Π°Π·Π΄Π΅Π» описания ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…, Π²Ρ‹Π΄Π΅Π»Π΅Π½ΠΈΠ΅}

{ячССк памяти для хранСния Ρ†Π΅Π»Ρ‹Ρ… Π²Π΅Π»ΠΈΡ‡ΠΈΠ½}

BEGIN {Π½Π°Ρ‡Π°Π»ΠΎ Ρ€Π°Π·Π΄Π΅Π»Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ²}

c:=547; b:=42; {занСсСниС Π² ΡΡ‡Π΅ΠΉΠΊΠΈ c ΠΈ b Π½Π°Ρ‡Π°Π»ΡŒΠ½Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ}

a:=c+b; {вычислСниС значСния ΠΈ Π²Ρ‹Π΄Π°Ρ‡Π° Π½Π°}

writeln (a); {экран (write — ΠΏΠΈΡΠ°Ρ‚ΡŒ) значСния a}

END. {ΠΊΠΎΠ½Π΅Ρ† ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹}.

НапоминаСм, Ρ‡Ρ‚ΠΎ тСксты, Π·Π°ΠΊΠ»ΡŽΡ‡Ρ‘Π½Π½Ρ‹Π΅ Π² ΡΠΊΠΎΠ±ΠΊΠΈ { }, ΡΠ²Π»ΡΡŽΡ‚ΡΡ коммСнтариями, Π½Π΅ ΡΠ²Π»ΡΡŽΡ‚ся Ρ‡Π°ΡΡ‚ΡŒΡŽ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ΠΈ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΠΎΠΏΡƒΡ‰Π΅Π½Ρ‹, Ρ‚Π°ΠΊΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ, ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° для Π­Π’Πœ ΠΈΠΌΠ΅Π΅Ρ‚ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π²ΠΈΠ΄:

Program Prim1;

Var

a, b, c:integer;

BEGIN

c:=547; b:=42;

a:=c+b;

writeln(a);

readln;

END.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° записываСтся Π² Π²ΠΈΠ΄Π΅ строк. Максимальная Π΄Π»ΠΈΠ½Π° строки 255 символов, Π½ΠΎ Π½Π΅ ΡΡ‚ΠΎΠΈΡ‚ Π΄Π΅Π»Π°Ρ‚ΡŒ строки Π΄Π»ΠΈΠ½Π½Π΅Π΅ строки экрана — 80 символов, ΠΈΠ½Π°Ρ‡Π΅ строки Π±ΡƒΠ΄ΡƒΡ‚ «ΠΏΡ€ΡΡ‚Π°Ρ‚ΡŒΡΡ» Π·Π° ΠΏΡ€Π΅Π΄Π΅Π»Π°ΠΌΠΈ ΠΎΠΊΠ½Π° экрана, хотя строки ΠΈ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΎΡΠΌΠΎΡ‚Ρ€Π΅Ρ‚ΡŒ, пСрСдвигая «ΠΎΠΊΠ½ΠΎ» (рис. 2.2).

" Π₯ΠΎΡ€ΠΎΡˆΠ΅Π΅" располоТСниС строк «ΠŸΠ»ΠΎΡ…ΠΎΠ΅» располоТСниС строк

рис. 2.2

ΠšΠ°ΠΆΠ΄ΡƒΡŽ строку ΠΌΠΎΠΆΠ½ΠΎ Π½Π°Ρ‡ΠΈΠ½Π°Ρ‚ΡŒ Π½Π΅ Ρ ΠΏΠ΅Ρ€Π²ΠΎΠΉ ΠΏΠΎΠ·ΠΈΡ†ΠΈΠΈ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π±Ρ‹Π»Π° Π±ΠΎΠ»Π΅Π΅ Ρ‡ΠΈΡ‚Π°Π΅ΠΌΠΎΠΉ.

2.4. ΠŸΡ€ΠΎΡΡ‚Π΅ΠΉΡˆΠΈΠΉ Π²Π²ΠΎΠ΄-Π²Ρ‹Π²ΠΎΠ΄

Π’ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ Prim1 ΠΌΡ‹ Π·Π°Π΄Π°Π²Π°Π»ΠΈ исходныС Π΄Π°Π½Π½Ρ‹Π΅ с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° присваивания, Ρ‡Ρ‚ΠΎ Π½Π΅ Π²ΡΠ΅Π³Π΄Π° ΡƒΠ΄ΠΎΠ±Π½ΠΎ, Ссли ΠΎΠ΄Π½Ρƒ ΠΈ Ρ‚Ρƒ ΠΆΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ Π½ΡƒΠΆΠ½ΠΎ ΠΏΡ€ΠΎΡΡ‡ΠΈΡ‚Ρ‹Π²Π°Ρ‚ΡŒ с Ρ€Π°Π·Π»ΠΈΡ‡Π½Ρ‹ΠΌΠΈ исходными Π΄Π°Π½Π½Ρ‹ΠΌΠΈ. Для присвоСния Π½Π°Ρ‡Π°Π»ΡŒΠ½Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ ΠΌΠΎΠΆΠ½ΠΎ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚ΡŒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ readln (ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€, ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€,…, ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€); Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, readln (c, b). встрСтив Ρ‚Π°ΠΊΠΎΠΉ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, машина остановится ΠΈ Π±ΡƒΠ΄Π΅Ρ‚ ΠΆΠ΄Π°Ρ‚ΡŒ, ΠΏΠΎΠΊΠ° ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒ Π½Π΅ Π½Π°Π±Π΅Ρ€Π΅Ρ‚ Π½Π° ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Π΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ с, Π½Π°ΠΆΠΌΠ΅Ρ‚ ΠΊΠ»Π°Π²ΠΈΡˆΡƒ «ΠΏΡ€ΠΎΠ±Π΅Π»», Π½Π°Π±Π΅Ρ€Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ b ΠΈ Π½Π°ΠΆΠΌΠ΅Ρ‚ ΠΊΠ»Π°Π²ΠΈΡˆΡƒ ENTER (Π²Π²ΠΎΠ΄).значСния Π²Π΅Π»ΠΈΡ‡ΠΈΠ½ c ΠΈ b отобразятся Π½Π° ΡΠΊΡ€Π°Π½Π΅ ΠΈ ΠΏΠΎΡΠ»Π΅ наТатия клавиши ENTER занСсутся Π² ΡΡ‡Π΅ΠΉΠΊΠΈ памяти ΠΌΠ°ΡˆΠΈΠ½Ρ‹ с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ с ΠΈ b соотвСтствСнно. Ρ‚ΠΎΠ³Π΄Π° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Prim1 ΠΏΡ€ΠΈΠΌΠ΅Ρ‚ Π²ΠΈΠ΄:

Program Prim1a;

Var a, b, c: integer;

BEGIN readln (c, b);

a: = c+b;

writeln (a);

readln ;

END.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅ 1. Напомним, Ρ‡Ρ‚ΠΎ машинС Π±Π΅Π·Ρ€Π°Π·Π»ΠΈΡ‡Π½ΠΎ, строчныС ΠΈΠ»ΠΈ прописныС Π±ΡƒΠΊΠ²Ρ‹ ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²Ρ‹Ρ… слов end, end ΠΈ end (Π½ΠΎ Π½Π΅ Π΄Π»Ρ вас).

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅ 2. Π£Π΄ΠΎΠ±Π½ΠΎ ΡΡ‚Π°Π²ΠΈΡ‚ΡŒ Readln ΠΏΠ΅Ρ€Π΅Π΄ END, Ρ‚Π°ΠΊ ΠΊΠ°ΠΊ послС выполнСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ машина Π²Ρ‹Π΄Π°Ρ‘Ρ‚ Π½Π° ΡΠΊΡ€Π°Π½ ΠΎΠΊΠ½ΠΎ тСкста ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, Π° Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ «ΠΏΡ€ΡΡ‡Π΅Ρ‚ся» Π·Π° ΡΡ‚ΠΈΠΌ ΠΎΠΊΠ½ΠΎΠΌ ΠΈ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π΅Π³ΠΎ ΠΏΠΎΡΠΌΠΎΡ‚Ρ€Π΅Ρ‚ΡŒ, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ΡƒΠ±Ρ€Π°Ρ‚ΡŒ ΠΎΠΊΠ½ΠΎ с ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΎΠΉ с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ наТатия клавиш. Если ΠΏΠ΅Ρ€Π΅Π΄ END имССтся Readln, Ρ‚ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π½Π΅ Π·Π°Π²Π΅Ρ€ΡˆΠΈΡ‚ Ρ€Π°Π±ΠΎΡ‚Ρƒ, ΠΏΠΎΠΊΠ° Π²Ρ‹ Π½Π΅ Π½Π°ΠΆΠΌΠ΅Ρ‚Π΅ ΠΊΠ»Π°Π²ΠΈΡˆΡƒ ENTER, Ρ‚. Π΅. Π² Π΄Π°Π½Π½ΠΎΠΌ случаС Π½Π° ΡΠΊΡ€Π°Π½ Π±ΡƒΠ΄Π΅Ρ‚ Π²Ρ‹Π²Π΅Π΄Π΅Π½ΠΎ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Π°. Π’Ρ‹ ΠΏΠΎΡΠΌΠΎΡ‚Ρ€ΠΈΡ‚Π΅ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΈ Π½Π°ΠΆΠΌΠ΅Ρ‚Π΅ ENTER для Π²Ρ…ΠΎΠ΄Π° Π² Ρ€Π΅Π΄Π°ΠΊΡ‚ΠΎΡ€ языка Паскаль.

2.5. АрифмСтичСскиС выраТСния

АрифмСтичСскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ строится ΠΈΠ· ΠΎΠ±ΡŠΠ΅ΠΊΡ‚ΠΎΠ²: арифмСтичСских (числовых) констант; ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ΠΎΠ² ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…, описанных ΠΊΠ°ΠΊ числовыС; Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ Π² Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π΅ ΠΈΡ… Π²Ρ‹Ρ‡ΠΈΡΠ»Π΅Π½ΠΈΡ; арифмСтичСских Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ этих ΠΎΠ±ΡŠΠ΅ΠΊΡ‚ΠΎΠ², соСдинённых ΠΌΠ΅ΠΆΠ΄Ρƒ собой Π·Π½Π°ΠΊΠ°ΠΌΠΈ арифмСтичСских ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ ΠΈ ΠΊΡ€ΡƒΠ³Π»Ρ‹ΠΌΠΈ скобками. Π’ ΠΊΠ°Ρ‡Π΅ΡΡ‚Π²Π΅ констант ΠΌΠΎΠ³ΡƒΡ‚ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒΡΡ арифмСтичСскиС константы, Π·Π°Π΄Π°Π½Π½Ρ‹Π΅ Π² ΡΠ²Π½ΠΎΠΌ Π²ΠΈΠ΄Π΅: 5; 5.35, -7.374 Π• + 01 ΠΈ Ρ‚. ΠΏ., Π° Ρ‚Π°ΠΊΠΆΠ΅ ΠΈΠΌΠ΅Π½Π° констант, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Ρ‘Π½Π½Ρ‹Π΅ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ const.

Π’ ΠΊΠ°Ρ‡Π΅ΡΡ‚Π²Π΅ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡŽΡ‚ΡΡ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Π΅, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Ρ‘Π½Π½Ρ‹Π΅ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Var ΠΊΠ°ΠΊ byte, integer, real, ΠΈ ΠΈΡ… Ρ€Π°Π·Π½ΠΎΠ²ΠΈΠ΄Π½ΠΎΡΡ‚ΠΈ, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, longinteger, ΠΈ Ρ‚. Π΄., Ссли ΠΈΠΌ ΡƒΠΆΠ΅ присвоСны Π½Π°Ρ‡Π°Π»ΡŒΠ½Ρ‹Π΅ значСния.

Π’ ΠΊΠ°Ρ‡Π΅ΡΡ‚Π²Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ ΠΌΠΎΠ³ΡƒΡ‚ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒΡΡ стандартныС Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ языка Паскаль, Π±ΠΈΠ±Π»ΠΈΠΎΡ‚Π΅Ρ‡Π½Ρ‹Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΈ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ, написанныС самим ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΌ. Π‘ΠΈΠ±Π»ΠΈΠΎΡ‚Π΅Ρ‡Π½Ρ‹Π΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ доступны послС ΠΏΠΎΠ΄ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΡ ΠΌΠΎΠ΄ΡƒΠ»Π΅ΠΉ Π±ΠΈΠ±Π»ΠΈΠΎΡ‚Π΅ΠΊ. Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Ρ Π΄ΠΎΠ»ΠΆΠ½Ρ‹ Π±Ρ‹Ρ‚ΡŒ описаны Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ function.

ΠžΡΠ½ΠΎΠ²Π½Ρ‹Π΅ стандартныС Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Паскаля:

ΠžΠ±ΠΎΠ·Π½Π°Ρ‡Π΅Π½ΠΈΡ: I — цСлочислСнный Ρ‚ΠΈΠΏ; B — Π±Π°ΠΉΡ‚ΠΎΠ²Ρ‹ΠΉ Ρ‚ΠΈΠΏ; R — вСщСствСнный Ρ‚ΠΈΠΏ; IBR — цСлочислСнный, ΠΈΠ»ΠΈ Π±Π°ΠΉΡ‚ΠΎΠ²Ρ‹ΠΉ, ΠΈΠ»ΠΈ вСщСствСнный Ρ‚ΠΈΠΏΡ‹.

ABS (IBR) — ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½ΠΈΠ΅ Π°Π±ΡΠΎΠ»ΡŽΡ‚Π½ΠΎΠΉ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚Π° Ρ‚ΠΈΠΏΠ° i, b, r.

ARCTAN (IBR) — вычислСниС ΡƒΠ³Π»Π° (Π² Ρ€Π°Π΄ΠΈΠ°Π½Π°Ρ…), тангСнс ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ³ΠΎ Ρ€Π°Π²Π΅Π½ IBR.

Cos (IBR) , Sin (IBR).

Exp (IBR) — вычислСниС значСния eIBR.

Ln (IBR) — Π½Π°Ρ‚ΡƒΡ€Π°Π»ΡŒΠ½Ρ‹ΠΉ Π»ΠΎΠ³Π°Ρ€ΠΈΡ„ΠΌ IBR.Sgr (IBR) — Π²ΠΎΠ·Π²Π΅Π΄Π΅Π½ΠΈΠ΅ Π² ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚ IBR.

Sgrt (IBR) — вычислСниС корня ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚Π½ΠΎΠ³ΠΎ ΠΈΠ· IBR.

Π’ΠΎΠ·Π²Π΅Π΄Π΅Π½ΠΈΠ΅ Π² ΡΡ‚Π΅ΠΏΠ΅Π½ΡŒ выполняСтся ΠΏΠΎ Ρ„ΠΎΡ€ΠΌΡƒΠ»Π΅ ar= exp (r *ln (a)) для ΠΏΠΎΠ»ΠΎΠΆΠΈΡ‚Π΅Π»ΡŒΠ½Ρ‹Ρ… a Π»ΠΈΠ±ΠΎ организуСтся ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ ΡƒΠΌΠ½ΠΎΠΆΠ΅Π½ΠΈΠ΅ Π½Π° Π° r Ρ€Π°Π·. Для ΠΎΡ‚Ρ€ΠΈΡ†Π°Ρ‚Π΅Π»ΡŒΠ½Ρ‹Ρ… Π° Π²ΠΎΠ·ΠΌΠΎΠΆΠ΅Π½ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Π²Ρ‚ΠΎΡ€ΠΎΠΉ способ.

АрифмСтичСскиС ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ: +, -, — ΡƒΠΌΠ½ΠΎΠΆΠΈΡ‚ΡŒ; / — Ρ€Π°Π·Π΄Π΅Π»ΠΈΡ‚ΡŒ; mod — Π½Π°Ρ…ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ остатка ΠΎΡ‚ Π΄Π΅Π»Π΅Π½ΠΈΡ: 11 mod 5, Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚1; div — цСлочислСнноС Π΄Π΅Π»Π΅Π½ΠΈΠ΅ (дробная Ρ‡Π°ΡΡ‚ΡŒ отбрасываСтся) 11 div 5, Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ 2. АрифмСтичСскиС «ΠΈ» — Π°nd ΠΈ «ΠΈΠ»ΠΈ» — or производят поразрядноС булСвскоС ΡƒΠΌΠ½ΠΎΠΆΠ΅Π½ΠΈΠ΅ ΠΈΠ»ΠΈ слоТСниС Ρ†Π΅Π»Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ ΠΎΠΏΠ΅Ρ€Π°Π½Π΄ΠΎΠ² согласно Ρ‚Π°Π±Π»ΠΈΡ†Π°ΠΌ:

A Π°nd B A or B

0 Π°nd 0 = 0 0 or 0 = 0

1 Π°nd 0 = 0 1 or 0 = 1

0 Π°nd 1 = 0 0 or 1 = 1

1 Π°nd 1 = 1 1 or 1 = 1

ΠŸΡ€ΠΈΠΌΠ΅Ρ€: a: = 12; b: = 27.

Π’ΠΎ Π²Π½ΡƒΡ‚Ρ€Π΅Π½Π½Π΅ΠΌ ΠΊΠΎΠ΄Π΅ ΠΌΠ°ΡˆΠΈΠ½Ρ‹, Π² Π΄Π²ΠΎΠΈΡ‡Π½ΠΎ-дСсятичной систСмС, Ρ†ΠΈΡ„Ρ€Ρ‹ ΠΏΡ€Π΅Π΄ΡΡ‚Π°Π²Π»ΡΡŽΡ‚ΡΡ Π² Π΄Π΅ΡΡΡ‚ΠΈΡ‡Π½ΠΎΠΉ систСмС:

0000 = ноль

0001 = ΠΎΠ΄ΠΈΠ½

0010 = Π΄Π²Π°

0011 = Ρ‚Ρ€ΠΈ

0100 = Ρ‡Π΅Ρ‚Ρ‹Ρ€Π΅

0101 = ΠΏΡΡ‚ΡŒ

0110 = ΡˆΠ΅ΡΡ‚ΡŒ

0111 = сСмь

1000 = восСмь

1001 = Π΄Π΅Π²ΡΡ‚ΡŒ Π’ΠΎΠ³Π΄Π° 12 Π² Π΄Π΅ΡΡΡ‚ΠΈΡ‡Π½ΠΎΠΉ систСмС эквивалСнтно 0001 0010 Π΄Π²ΠΎΠΈΡ‡Π½ΠΎ-дСсятичной систСмы. Π½Π°ΠΏΠΎΠΌΠ½ΠΈΠΌ, Ρ‡Ρ‚ΠΎ Π² Π΄Π²ΠΎΠΈΡ‡Π½ΠΎ-дСсятичной систСмС каТдая дСсятичная Ρ†ΠΈΡ„Ρ€Π° прСдставлСна 4-Π·Π½Π°Ρ‡Π½Ρ‹ΠΌ Π΄Π²ΠΎΠΈΡ‡Π½Ρ‹ΠΌ ΠΊΠΎΠ΄ΠΎΠΌ этой Ρ†ΠΈΡ„Ρ€Ρ‹. Π’ ΡΡ‚ΠΎΠΌ случаС 27 — 0010 0111.

А Π°nd B, А or B

0001 0010 0001 0010

0010 0111 0010 0111

Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚: 0000 0010 Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚: 0011 0111

Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ прСобразуСтся Π² Π΄Π΅ΡΡΡ‚ΠΈΡ‡Π½ΡƒΡŽ Ρ„ΠΎΡ€ΠΌΡƒ 2 ΠΈ 37 соотвСтствСнно.

Π₯OR, ΠΈΡΠΊΠ»ΡŽΡ‡Π°ΡŽΡ‰Π΅Π΅ «ΠΈΠ»ΠΈ», ΠΏΡ€ΠΎΠΈΠ·Π²ΠΎΠ΄ΠΈΡ‚ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΡŽ согласно Ρ‚Π°Π±Π»ΠΈΡ†Π΅

A xor B

1 xor 1 = 0

1 xor 0 = 0

0 xor 1 = 1

0 xor 0 = 0

Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ прСобразуСтся Π² Π΄Π΅ΡΡΡ‚ΠΈΡ‡Π½ΡƒΡŽ Ρ„ΠΎΡ€ΠΌΡƒ.

ЦикличСский сдвиг: k shl N — сдвиг числа ΠΊ Π²Π»Π΅Π²ΠΎ Π½Π° N ΠΏΠΎΠ·ΠΈΡ†ΠΈΠΉ,

k shr N — сдвиг числа ΠΊ Π²ΠΏΡ€Π°Π²ΠΎ Π½Π° N ΠΏΠΎΠ·ΠΈΡ†ΠΈΠΉ,

k ΠΈ N — Ρ†Π΅Π»Ρ‹Π΅.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€: 2 shl 7 = 256

0000 0000 0000 0010

0000 0001 0000 0000

0 Π΅Π΄ΠΈΠ½ΠΈΡ†

0 Π΄Π²ΠΎΠ΅ΠΊ

0 Ρ‡Π΅Ρ‚Π²Π΅Ρ€ΠΎΠΊ

0 Π²ΠΎΡΡŒΠΌΠ΅Ρ€ΠΎΠΊ

0 ΡˆΠ΅ΡΡ‚Π½Π°Π΄Ρ†Π°Ρ‚ΡŒ

0 Ρ‚Ρ€ΠΈΠ΄Ρ†Π°Ρ‚ΡŒ Π΄Π²Π°

0 ΡˆΠ΅ΡΡ‚ΡŒΠ΄Π΅ΡΡΡ‚ Ρ‡Π΅Ρ‚Ρ‹Ρ€Π΅

0 сто Π΄Π²Π°Π΄Ρ†Π°Ρ‚ΡŒ восСмь

1 двСсти ΠΏΡΡ‚ΡŒΠ΄Π΅ΡΡΡ‚ ΡˆΠ΅ΡΡ‚ΡŒ ПояснСниС: Π² Π»ΡŽΠ±ΠΎΠΉ ΠΏΠΎΠ·ΠΈΡ†ΠΈΠΎΠ½Π½ΠΎΠΉ систСмС счислСния Π½Π° ΠΏΠ΅Ρ€Π²ΠΎΠΌ мСстС справа Π² Ρ‡ΠΈΡΠ»Π΅ стоит количСство оснований систСмы счисСния Π² ΡΡ‚Π΅ΠΏΠ΅Π½ΠΈ 0, Π½Π° Π²Ρ‚ΠΎΡ€ΠΎΠΌ мСстС справа — количСство оснований Π² ΡΡ‚Π΅ΠΏΠ΅Π½ΠΈ 1, Π½Π° Ρ‚Ρ€Π΅Ρ‚ΡŒΠ΅ΠΌ мСстС справа — количСство оснований Π² ΡΡ‚Π΅ΠΏΠ΅Π½ΠΈ 2 ΠΈ Ρ‚. Π΄. Ρ‚Π°ΠΊ, для дСсятичной систСмы ΠΈΠΌΠ΅Π΅ΠΌ:

3 2 4

количСство Π΅Π΄ΠΈΠ½ΠΈΡ† 100 * 4 = 4

количСство дСсятков 101 * 2 = 20

количСство сотСн 102 * 3 = 300

слоТим = 324

Для Π΄Π²ΠΎΠΈΡ‡Π½ΠΎΠΉ систСмы:

1 0 1 1 0 0 1

количСство Π΅Π΄ΠΈΠ½ΠΈΡ† 20 * 1 = 1

количСство Π΄Π²ΠΎΠ΅ΠΊ 21 * 0 = 0

количСство Ρ‡Π΅Ρ‚Π²Π΅Ρ€ΠΎΠΊ 22 * 0 = 0

количСство Π²ΠΎΡΡŒΠΌΠ΅Ρ€ΠΎΠΊ 23 * 1 = 8

количСство ΡˆΠ΅ΡΡ‚Π½Π°Π΄Ρ†Π°Ρ‚ΠΎΠΊ 24 * 1 = 16

количСство Ρ‚Ρ€ΠΈΠ΄Ρ†Π°Ρ‚ΡŒ Π²Ρ‚ΠΎΡ€Ρ‹Ρ… 25 * 1 = 0

количСство ΡˆΠ΅ΡΡ‚ΡŒΠ΄Π΅ΡΡΡ‚ Ρ‡Π΅Ρ‚Π²Π΅Ρ€ΠΎΠΊ 26 * 1 = 64

слоТим = 89

Ρ‚.Π΅. дСсятичноС 89 ΠΈΠΌΠ΅Π΅Ρ‚ ΠΈΠ·ΠΎΠ±Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ 1 011 001 Π² Π΄Π²ΠΎΠΈΡ‡Π½ΠΎΠΉ систСмС.

Для ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎΠ³ΠΎ написания арифмСтичСских Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠΉ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ΡΠΎΠ±Π»ΡŽΠ΄Π°Ρ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠ΅ ΠΏΡ€Π°Π²ΠΈΠ»Π°:

1. Π—Π°ΠΏΡ€Π΅Ρ‰Π΅Π½ΠΎ ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ появлСниС Π·Π½Π°ΠΊΠΎΠ² Π΄Π²ΡƒΡ… ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ, Ρ‚. Π΅.

A + - B — Π½Π΅Π²Π΅Ρ€Π½ΠΎ, A + (-B) — Π²Π΅Ρ€Π½ΠΎ.

2. ΠŸΠΎΡ€ΡΠ΄ΠΎΠΊ выполнСния ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ: /, div, mod, and, or, shl, shr, -, +. ΠŸΠΎΡ€ΡΠ΄ΠΎΠΊ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π½Π°Ρ€ΡƒΡˆΠ΅Π½ ΠΊΡ€ΡƒΠ³Π»Ρ‹ΠΌΠΈ скобками, Ρ‚Π°ΠΊ ΠΊΠ°ΠΊ Ρ‡Π°ΡΡ‚ΡŒ выраТСния, Π·Π°ΠΊΠ»ΡŽΡ‡Ρ‘Π½Π½Π°Ρ Π² ΠΊΡ€ΡƒΠ³Π»Ρ‹Π΅ скобки, выполняСтся Π² ΠΏΠ΅Ρ€Π²ΡƒΡŽ ΠΎΡ‡Π΅Ρ€Π΅Π΄ΡŒ.

3. Если ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΈΠΌΠ΅ΡŽΡ‚ ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²Ρ‹ΠΉ ΠΏΡ€ΠΈΠΎΡ€ΠΈΡ‚Π΅Ρ‚, Ρ‚ΠΎ ΠΎΠ½ΠΈ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡŽΡ‚ΡΡ ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ.

4. Унарная опСрация ΠΈΠΌΠ΅Π΅Ρ‚ самый Π½ΠΈΠ·ΠΊΠΈΠΉ ΠΏΡ€ΠΈΠΎΡ€ΠΈΡ‚Π΅Ρ‚, поэтому —A b интСрпрСтируСтся ΠΊΠ°ΠΊ —(A b).

5. НС ΡΠ»Π΅Π΄ΡƒΠ΅Ρ‚ Π·Π°ΠΏΠΈΡΡ‹Π²Π°Ρ‚ΡŒ выраТСния, Π½Π΅ ΠΈΠΌΠ΅ΡŽΡ‰ΠΈΠ΅ арифмСтичСского смысла, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, Π΄Π΅Π»Π΅Π½ΠΈΠ΅ Π½Π° Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, Ρ€Π°Π²Π½ΠΎΠ΅ 0.

6. Π‘Π»Π΅Π΄ΡƒΠ΅Ρ‚ ΠΏΠΎΠΌΠ½ΠΈΡ‚ΡŒ, Ρ‡Ρ‚ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ / ΠΈ ΠΈΠΌΠ΅ΡŽΡ‚ ΠΎΠ΄ΠΈΠ½Π°ΠΊΠΎΠ²Ρ‹ΠΉ ΠΏΡ€ΠΈΠΎΡ€ΠΈΡ‚Π΅Ρ‚, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, 18/23=27, Π° Π½Π΅ 3. Ρ‡Ρ‚ΠΎΠ±Ρ‹ Π±Ρ‹Π»ΠΎ 3, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ Π·Π°ΠΏΠΈΡΠ°Ρ‚ΡŒ 18/(23).

2.6. Описания ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ….

Описания ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… зависят ΠΎΡ‚ Ρ‚ΠΈΠΏΠ° Π΄Π°Π½Π½Ρ‹Ρ…, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π±ΡƒΠ΄ΡƒΡ‚ Ρ…Ρ€Π°Π½ΠΈΡ‚ΡŒΡΡ Π² ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… памяти, Π½Π°Π·Π²Π°Π½Π½Ρ‹Ρ… ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ этих ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ….

Π”Π°Π½Π½Ρ‹Π΅ Π² ΠŸΠ°ΡΠΊΠ°Π»Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΡ… Ρ‚ΠΈΠΏΠΎΠ²:

Π”Π°Π½Π½Ρ‹Π΅

БкалярныС Π‘Ρ‚Ρ€ΡƒΠΊΡ‚ΡƒΡ€ΠΈΡ€ΠΎΠ²Π°Π½Π½Ρ‹Π΅

массивы записи Π‘Ρ‚Π°Π½Π΄Π°Ρ€Ρ‚Π½Ρ‹Π΅ ΠžΠΏΡ€Π΅Π΄Π΅Π»Ρ‘Π½Π½Ρ‹Π΅

ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΌ строки Ρ„Π°ΠΉΠ»Ρ‹ Ρ†Π΅Π»Ρ‹Π΅ логичСскиС ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΡŒΠ½Ρ‹Π΅ мноТСства

вСщСствСнныС пСрСчисляСмыС ΡƒΠΊΠ°Π·Π°Ρ‚Π΅Π»ΠΈ Π±Π°ΠΉΡ‚ΠΎΠ²Ρ‹Π΅ ΡΠΈΠΌΠ²ΠΎΠ»ΡŒΠ½Ρ‹Π΅ ΠšΠ°ΠΆΠ΄ΠΎΠΌΡƒ Ρ‚ΠΈΠΏΡƒ Π΄Π°Π½Π½Ρ‹Ρ… ΠΌΠΎΠ³ΡƒΡ‚ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ константы. ΠšΠΎΠ»ΠΈΡ‡Π΅ΡΡ‚Π²ΠΎ элСмСнтов констант (Ρ†ΠΈΡ„Ρ€, Π±ΡƒΠΊΠ²) сильно зависит ΠΎΡ‚ ΠΊΠΎΠ½ΠΊΡ€Π΅Ρ‚Π½ΠΎΠΉ ΠΊΠΎΠ½Ρ„ΠΈΠ³ΡƒΡ€Π°Ρ†ΠΈΠΈ ΠΌΠ°ΡˆΠΈΠ½Ρ‹. Однако ΠΌΠΎΠΆΠ½ΠΎ ΡΠΊΠ°Π·Π°Ρ‚ΡŒ, Ρ‡Ρ‚ΠΎ для Ρ†Π΅Π»ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° числа максимальноС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ 32 767, для вСщСствСнных, ΠΊΠ°ΠΊ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌ, — Π΄ΠΎ 7 Ρ†ΠΈΡ„Ρ€ мантиссы, для строковых — 255 символов ΠΈ Ρ‚. Π΄.

ΠšΠΎΠ½ΡΡ‚Π°Π½Ρ‚Ρ‹ Π±Π°ΠΉΡ‚ΠΎΠ²ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° — Ρ†Π΅Π»Ρ‹Π΅ числа Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ 0 — 255. Π¦Π΅Π»Ρ‹Π΅ константы — Π½Π°Π±ΠΎΡ€ Ρ†ΠΈΡ„Ρ€, Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ, со Π·Π½Π°ΠΊΠΎΠΌ + ΠΈΠ»ΠΈ -. ВСщСствСнныС константы ΠΌΠΎΠ³ΡƒΡ‚ Π·Π°ΠΏΠΈΡΡ‹Π²Π°Ρ‚ΡŒΡΡ Π² Π΄Π²ΡƒΡ… Ρ„ΠΎΡ€ΠΌΠ°Ρ… — с Ρ„иксированной Ρ‚ΠΎΡ‡ΠΊΠΎΠΉ: 57.34;

— 256.758 ΠΈ Ρ ΠΏΠ»Π°Π²Π°ΡŽΡ‰Π΅ΠΉ Ρ‚ΠΎΡ‡ΠΊΠΎΠΉ: 5.734Π΅+01 (эквивалСнт 57.34) ΠΈ -2.56 758Π΅+02

(эквивалСнт -256.758).

ЛогичСских (булСвских) констант всСго Π΄Π²Π΅: TRUE ΠΈ FALSE. принято, Ρ‡Ρ‚ΠΎ Π² ΠΌΠ°ΡˆΠΈΠ½Π½ΠΎΠΌ ΠΊΠΎΠ΄Π΅ TRUE=1, FALSE=0. Π·Π½Π°ΠΊΠΎΠ²Ρ‹Π΅ константы ΠΏΡ€Π΅Π΄ΡΡ‚Π°Π²Π»ΡΡŽΡ‚ всС символы Π°Π»Ρ„Π°Π²ΠΈΡ‚Π° плюс символы ΠΊΠΈΡ€ΠΈΠ»Π»ΠΈΡ†Ρ‹, Π½ΠΎ Π½Π΅ Π΄Π»Ρ Ρ‚ΠΎΠ³ΠΎ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ символ стал константой, Π΅Π³ΠΎ Π½ΡƒΠΆΠ½ΠΎ Π·Π°ΠΊΠ»ΡŽΡ‡ΠΈΡ‚ΡŒ Π² Π°ΠΏΠΎΡΡ‚Ρ€ΠΎΡ„Ρ‹: А, 1, +,? ΠΈ Ρ‚. Π΄. ΠšΠΎΠ½ΡΡ‚Π°Π½Ρ‚Ρ‹ ΠΌΠΎΠ³ΡƒΡ‚ Ρ…Ρ€Π°Π½ΠΈΡ‚ΡŒΡΡ Π² ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… памяти, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Π½Ρ‹Ρ… ΠΊΠ°ΠΊΠΈΠΌΠΈ-Π»ΠΈΠ±ΠΎ ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ (ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Π°ΠΌΠΈ).

Π˜Π΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ — Π½Π°Π±ΠΎΡ€ Π±ΡƒΠΊΠ² ΠΈ Ρ†ΠΈΡ„Ρ€, пСрвая ΠΈΠ· Π½ΠΈΡ… — всСгда Π±ΡƒΠΊΠ²Π°, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€ А, ALP1, B2, GAMMA. Π˜Π΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ Π΄Π»ΠΈΠ½ΠΎΠΉ Π΄ΠΎ 255 символов, ΠΎΠ΄Π½Π°ΠΊΠΎ Π±ΠΎΠ»ΡŒΡˆΠΈΠ½ΡΡ‚Π²ΠΎ компиляторов Π½Π°ΠΊΠ»Π°Π΄Ρ‹Π²Π°Π΅Ρ‚ ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½ΠΈΠ΅, Ρ‚. Π΅. Π΄Π»ΠΈΠ½Π° ΠΈΠΌΠ΅Π½ΠΈ Π½Π΅ Π΄ΠΎΠ»ΠΆΠ½Π° ΠΏΡ€Π΅Π²Ρ‹ΡˆΠ°Ρ‚ΡŒ восьми символов. Π˜Π΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€ Π² ΡΠ²ΠΎΠ΅ΠΌ составС ΠΌΠΎΠΆΠ΅Ρ‚ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Ρ‚ΡŒ Π·Π½Π°ΠΊ _ (ΠΏΠΎΠ΄Ρ‡Π΅Ρ€ΠΊ).

ΠŸΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ описаны Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ описания ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… Var. Ρ€Π°Π·Π΄Π΅Π»ΠΎΠ² описания ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π΄ΠΎ ΠΏΡΡ‚ΠΈ, Π»ΡƒΡ‡ΡˆΠ΅ ΠΈΡ… Ρ€Π°ΡΠΏΠΎΠ»Π°Π³Π°Ρ‚ΡŒ Π² ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ порядкС: Label, Const, Type, Var, functuon ΠΈ procedure.

Если Π΄Π°Π½Π½ΠΎΠ΅ Π±ΡƒΠ΄Π΅Ρ‚ ΠΈΠ·ΠΌΠ΅Π½ΡΡ‚ΡŒΡΡ (ΠΏΠΎ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π΅) Π² ΠΏΡ€ΠΎΡ†Π΅ΡΡΠ΅ выполнСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, Ρ‚ΠΎ ΠΈΠΌΡ этого Π΄Π°Π½Π½ΠΎΠ³ΠΎ описываСтся Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Var с ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΌ Π°Ρ‚Ρ€ΠΈΠ±ΡƒΡ‚ΠΎΠΌ:

Π‘Π°ΠΉΡ‚ΠΎΠ²Ρ‹ΠΉ Ρ‚ΠΈΠΏ — byte;

Π¦Π΅Π»Ρ‹ΠΉ Ρ‚ΠΈΠΏ — integer;

ВСщСствСнный Ρ‚ΠΈΠΏ — real;

БулСвский Ρ‚ΠΈΠΏ — boolean;

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

ΠŸΡ€ΠΈΠΌΠ΅Ρ€:

Var

k n: integer;

S, T, Z: char;

a, b, c: real;

L25,L3: boolean;

FAZA: byte;

Π’ ΡΡ‚ΠΎΠΌ случаС всС описанныС ΠΈΠ΄Π΅Π½Ρ‚ΠΈΡ„ΠΈΠΊΠ°Ρ‚ΠΎΡ€Ρ‹ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅. Π Π°Π±ΠΎΡ‚Π° этого Ρ€Π°Π·Π΄Π΅Π»Π° Π±ΡƒΠ΄Π΅Ρ‚ Π·Π°ΠΊΠ»ΡŽΡ‡Π°Ρ‚ΡŒΡΡ Π² Ρ‚ΠΎΠΌ, Ρ‡Ρ‚ΠΎ машина Π²Ρ‹Π΄Π΅Π»ΠΈΡ‚ Π΄Π²Π΅ ячСйки памяти с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ k ΠΈ n. Π’ ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… ΠΌΠΎΠ³ΡƒΡ‚ Ρ…Ρ€Π°Π½ΠΈΡ‚ΡŒΡΡ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Ρ†Π΅Π»Ρ‹Π΅ числа: Π² ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ S, T, Z — ΠΏΠΎ ΠΎΠ΄Π½ΠΎΠΌΡƒ символу; Π² ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… a, b, c — Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ Ρ‚ΠΈΠΏΠ° вСщСствСнных чисСл; Π² L25 ΠΈ L3 -Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ true ΠΈ FALSE, Π° Π² ΡΡ‡Π΅ΠΉΠΊΠ΅ с ΠΈΠΌΠ΅Π½Π΅ΠΌ FAZA — Ρ‚ΠΎΠ»ΡŒΠΊΠΎ числа ΠΎΡ‚ 0 Π΄ΠΎ 255. Если ΠΏΠΎΠΏΡ‹Ρ‚Π°Ρ‚ΡŒΡΡ, Π½Π°ΠΏΡ€ΠΈΠΌΠ΅Ρ€, Π² ΡΡ‡Π΅ΠΉΠΊΡƒ S ΠΏΠΎΠΌΠ΅ΡΡ‚ΠΈΡ‚ΡŒ Π½Π΅ ΡΠΈΠΌΠ²ΠΎΠ», Π° Ρ‡ΠΈΡΠ»ΠΎ, Ρ‚ΠΎ ΡΡ‚ΠΎ ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Ρ‚ ΠΊ ΠΎΡˆΠΈΠ±ΠΊΠ΅, Ρ‚. Π΅. ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ S:= A; ΠΈΠ»ΠΈ S:= $; ΠΈΠ»ΠΈ S:= 1; ΠΎΠ΄Π½Π°ΠΊΠΎ Π½Π΅Π²Π΅Ρ€Π½ΠΎ S:= 1 (1 — число Π² ΠΎΡ‚Π»ΠΈΡ‡ΠΈΠ΅ ΠΎΡ‚ 1 — символа). Если Π² ΠΏΡ€ΠΎΡ†Π΅ΡΡΠ΅ выполнСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π΄Π°Π½Π½ΠΎΠ΅ Π½Π΅ ΠΌΠ΅Π½ΡΠ΅Ρ‚ся, Ρ‚ΠΎ Π΅Π³ΠΎ ΠΌΠΎΠΆΠ½ΠΎ ΠΎΠΏΠΈΡΠ°Ρ‚ΡŒ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ «ΠžΠΏΠΈΡΠ°Π½ΠΈΡ констант» :

Const

A=36.74; B=true;

Π‘=Π°;

Π—Π΄Π΅ΡΡŒ Ρ‚ΠΎΠΆΠ΅ Π²Ρ‹Π΄Π΅Π»ΡΡŽΡ‚ΡΡ ячСйки памяти с ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ А, Π’, Π‘ для хранСния Π·Π°Π΄Π°Π½Π½Ρ‹Ρ… Π²Π΅Π»ΠΈΡ‡ΠΈΠ½, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π½Π΅ ΠΏΠΎΠ΄Π»Π΅ΠΆΠ°Ρ‚ измСнСнию.

Допустимо описаниС констант-Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠΉ:

Const

М = (32.5 + 0.64) / 3.14;

ΠšΡ€ΠΎΠΌΠ΅ Ρ‚ΠΎΠ³ΠΎ, машина «Π·Π½Π°Π΅Ρ‚», Ρ‡Π΅ΠΌΡƒ Ρ€Π°Π²Π½Ρ‹ константы Π΅ ΠΈ ?.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€. Π‘ΠΎΡΡ‚Π°Π²ΠΈΡ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ для вычислСния выраТСния

, Π³Π΄Π΅ Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρ‹ R, Π°, S, L, K Π²Π²ΠΎΠ΄ΡΡ‚ся с ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹.

ΠŸΡƒΡΡ‚ΡŒ k, l — Ρ†Π΅Π»Ρ‹Π΅ числа, ΠΎΡΡ‚Π°Π»ΡŒΠ½Ρ‹Π΅ — вСщСствСнныС.

Program Prim2,

Var k, L: integer;

Y, R,a, S: real; {здСсь для хранСния Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Π° y Ρ‚ΠΎΠΆΠ΅}

{Π½ΡƒΠΆΠ½Π° ячСйка ΠΏΠ°ΠΌΡΡ‚ΠΈ}

Begin writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Ρ†Π΅', {Π²Ρ‹Π΄Π°Ρ‡Π° Π½Π° ΡΠΊΡ€Π°Π½ тСкста, ΡƒΠΊΠ°Π·Π°Π½Π½ΠΎΠ³ΠΎ Π²}

'Π»ΠΎΠ΅ k, L, Π΄Π΅ΠΉΡΡ‚Π²ΠΈΡ‚Π΅Π»ΡŒΠ½Ρ‹Π΅' {ΠΊΠ°Π²Ρ‹Ρ‡ΠΊΠ°Ρ…; ΠΎΠ±Ρ€Π°Ρ‚ΠΈΡ‚Π΅ Π²Π½ΠΈΠΌΠ°Π½ΠΈΠ΅ Π½Π° ΠΏΡ€Π°Π²ΠΈ-}

'R, Π°, S'); {Π»ΠΎ пСрСноса тСкста Π² ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π΅ writeln:}

{Ссли Π½ΡƒΠΆΠ½ΠΎ пСрСнСсти тСкст, Ρ‚ΠΎ ΡΡ‚авится} {Π·Π°ΠΊΡ€Ρ‹Π²Π°ΡŽΡ‰ΠΈΠΉ апостроф, Π·Π°Ρ‚Π΅ΠΌ запятая,}

{новая строка вновь начинаСтся с Π°ΠΏΠΎΡΡ‚Ρ€ΠΎΡ„Π°}

readln (k, L, R, a, S);

Y: = 1-l (l+sqr (r a/k))/(exp (2)/sqr (s) sqr (l+r a/l));

writeln (Y); readln;

END.

Π’ΠΎ ΠΆΠ΅ ΡΠ°ΠΌΠΎΠ΅ Π±ΡƒΠ΄Π΅Ρ‚, Ссли Π·Π°ΠΏΠΈΡΠ°Ρ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ:

Program Prim2a;

Var k, L: integer, R, a, S:real;

Begin writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Ρ†Π΅Π»Ρ‹Π΅ k, L'); readln (k, L);

writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ вСщСствСнныС r, S, a'); readln (R, S, a);

writeln (l-l/(l+sqr (ra/k))/(exp (2)/sqr (s)sqr (l+ra/l)),

readln; END.

ПослСдний ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ writeln Π²Π½Π°Ρ‡Π°Π»Π΅ вычислит арифмСтичСскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, Π° Π·Π°Ρ‚Π΅ΠΌ Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ Π½Π° ΡΠΊΡ€Π°Π½ Π΅Π³ΠΎ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Π² Π²ΠΈΠ΄Π΅ числа. Если ΠΌΡ‹ Ρ…ΠΎΡ‚ΠΈΠΌ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ Π±Ρ‹Π» Π² Π²ΠΈΠ΄Π΅ 'Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ Y = число', Ρ‚ΠΎ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ послСдний writeln Π½Π°ΠΏΠΈΡΠ°Ρ‚ΡŒ Π² ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ Π²ΠΈΠ΄Π΅:

writeln ('Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ Y =', 1-l/(l+sqr (ra/k))/exp (2)/sqr (s) sqr (l+ra/l)); Ρ‚ΠΎΠ³Π΄Π° машина Π²Π½Π°Ρ‡Π°Π»Π΅ Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ тСкст, взятый Π² Π°ΠΏΠΎΡΡ‚Ρ€ΠΎΡ„, Ρ‚. Π΅. «Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ Yi», Π° Π·Π°Ρ‚Π΅ΠΌ Π΅Π³ΠΎ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅.

2.7. Π Π°Π·Π΄Π΅Π» описания Ρ‚ΠΈΠΏΠΎΠ²

Помимо Π²Ρ‹ΡˆΠ΅ΠΏΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»Π΅Π½Π½Ρ‹Ρ… стандартных Ρ‚ΠΈΠΏΠΎΠ² Π² ΠŸΠ°ΡΠΊΠ°Π»Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½Ρ‹ Ρ‚ΠΈΠΏΡ‹, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Π½Ρ‹Π΅ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΌ, Ρ‚. Π΅. пСрСчисляСмыС ΠΈ ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΡŒΠ½Ρ‹Π΅ Ρ‚ΠΈΠΏΡ‹. ΠŸΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΡΠ΅ΠΌΡ‹Π΅ Ρ‚ΠΈΠΏΡ‹ Π·Π°Π΄Π°ΡŽΡ‚ΡΡ нСпосрСдствСнным пСрСчислСниСм всСх Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ ΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ пСрСмСнная Π΄Π°Π½Π½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°. ΠžΠΏΠΈΡΠ°Ρ‚ΡŒ Ρ‚ΠΈΠΏΡ‹, ΠΎΠΏΡ€Π΅Π΄Π΅Π»Π΅Π½Π½Ρ‹Π΅ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΌ, ΠΌΠΎΠΆΠ½ΠΎ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Var ΠΈΠ»ΠΈ ΠΏΡ€Π΅Π΄Π²Π°Ρ€ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Π’ΡƒΡ€Π΅, Π° Π·Π°Ρ‚Π΅ΠΌ — Π² Var. рассмотрим ΠΎΠ±Π° Π²Π°Ρ€ΠΈΠ°Π½Ρ‚Π°.

ΠŸΡƒΡΡ‚ΡŒ Π½Π°ΠΌ Π½ΡƒΠΆΠ½Π° пСрСмСнная с ΠΈΠΌΠ΅Π½Π΅ΠΌ season (сСзон Π³ΠΎΠ΄Π°). ΠΎΠ½Π° ΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ значСния winter (Π·ΠΈΠΌΠ°), spring (вСсна), summer (Π»Π΅Ρ‚ΠΎ), autumn (осСнь), Π΄Ρ€ΡƒΠ³ΠΈΠ΅ значСния ΠΎΠ½Π° ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ Π½Π΅ ΠΌΠΎΠΆΠ΅Ρ‚. Π’ΠΎΠ³Π΄Π° Π½ΡƒΠΆΠ½ΠΎ ΡΠ΄Π΅Π»Π°Ρ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π΅ описаниС:

Var season: (winter, spring, summer, autumn).

Π—Π΄Π΅ΡΡŒ Ρ‚ΠΈΠΏ season Π·Π°Π΄Π°Π½ пСрСчислСниСм всСх констант, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ занСсСны Π² ΡΡ‡Π΅ΠΉΠΊΡƒ памяти season. ΠŸΠΎΠΏΡ‹Ρ‚ΠΊΠ° занСсти Π² ΡΡ‡Π΅ΠΉΠΊΡƒ season любоС Π΄Ρ€ΡƒΠ³ΠΎΠ΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Ρ‚ ΠΊ ΠΎΡˆΠΈΠ±ΠΊΠ΅ — «Π½Π΅ΡΠΎΠΎΡ‚вСтствиС Ρ‚ΠΈΠΏΠ°» .

Если ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… Π΄Π°Π½Π½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Π±ΡƒΠ΄Π΅Ρ‚ нСсколько, ΡƒΠ΄ΠΎΠ±Π½Π΅Π΅ ΠΈ Π½Π°Π³Π»ΡΠ΄Π½Π΅Π΅ Π²Π½Π°Ρ‡Π°Π»Π΅ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ Ρ‚ΠΈΠΏ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Π’ΡƒΡ€Π΅ (описаниС Ρ‚ΠΈΠΏΠ°), Π° Π·Π°Ρ‚Π΅ΠΌ Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ Var ΡΠΎΡΠ»Π°Ρ‚ΡŒΡΡ Π½Π° ΡΡ‚ΠΎΡ‚ Ρ‚ΠΈΠΏ, ΠΈ ΠΌΠ°ΡˆΠΈΠ½Π° Π² Var Π²Ρ‹Π΄Π΅Π»ΠΈΡ‚ ΠΊΠΎΠ½ΠΊΡ€Π΅Ρ‚Π½Ρ‹Π΅ ячСйки памяти для хранСния Π΄Π°Π½Π½Ρ‹Ρ… ΡƒΠΊΠ°Π·Π°Π½Π½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°.

НапримСр, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ, Ρ‡Ρ‚ΠΎ Gi, G2, G3, G4 Π±ΡƒΠ΄ΡƒΡ‚ ячСйками памяти, Π² ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… ΠΌΠΎΠ³ΡƒΡ‚ Ρ…Ρ€Π°Π½ΠΈΡ‚ΡŒΡΡ наимСнования Π³Π°Π·ΠΎΠ² Π‘ΠΎ, О, N, F, Π° Π² ΡΡ‡Π΅ΠΉΠΊΠ°Ρ… памяти Metall1, Metall2, Metall3 — наимСнования ΠΌΠ΅Ρ‚Π°Π»Π»ΠΎΠ² FΠ΅, Π‘ΠΎ, Na, Cu, Zn, Ρ‚ΠΎΠ³Π΄Π° ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΠΈΡ‚ΡŒ описаниС:

VAR GI, G2, G3, G4: (CO, O, N, F);

Metall1, Metall2, Metall3: (Fe, Co, Na, Cu, Zn).

МоТно ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚ΡŒ ΠΈ Π΄Ρ€ΡƒΠ³ΠΎΠ΅, Π±ΠΎΠ»Π΅Π΅ наглядноС описаниС. Π²Π½Π°Ρ‡Π°Π»Π΅ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ Ρ‚ΠΈΠΏ Gaz, Met, Π° Π·Π°Ρ‚Π΅ΠΌ Π½Π° Π½ΠΈΡ… ΡΠΎΡΠ»Π°Ρ‚ΡŒΡΡ:

Π’ΡƒΡ€Π΅ Gaz=(Co, О, N, F);

Met = (FΠ΅, Π‘ΠΎ, Na, Cu, Zn);

Var GI, G2, G3, G4: GAZ;

Metall1, Metall2, Metall3, Met;

ОсобСнно ΡƒΠ΄ΠΎΠ±Π½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠ΅ Ρ€Π°Π·Π΄Π΅Π»Π° Π’ΡƒΡ€Π΅, Ссли ΠΎΠ½ Π½Π°Ρ…одится Π²ΠΎ Π²Π½Π΅ΡˆΠ½Π΅ΠΌ Π±Π»ΠΎΠΊΠ΅, Π° ΡΡΡ‹Π»ΠΊΠΈ Π½Π° Π½Π΅Π³ΠΎ ΠΈΠ΄ΡƒΡ‚ Π²ΠΎ Π²Π½ΡƒΡ‚Ρ€Π΅Π½Π½ΠΈΡ… Π±Π»ΠΎΠΊΠ°Ρ… (см. Ρ€Π°Π·Π΄Π΅Π» «Π‘Π»ΠΎΠΊΠΈ»). Π’ΠΎΠ³Π΄Π° Π·Π½Π°Ρ‡ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ экономится ΠΏΠ°ΠΌΡΡ‚ΡŒ, ΠΏΠΎΡΠΊΠΎΠ»ΡŒΠΊΡƒ ΠΎΠ½Π° ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ практичСски ΠΎΠ΄Π½ΠΎΠΉ ΠΈ Ρ‚ΠΎΠΉ ΠΆΠ΅ Π² Ρ€Π°Π·Π½Ρ‹Ρ… Π±Π»ΠΎΠΊΠ°Ρ….

ΠŸΡ€ΠΈ описании ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… пСрСчисляСмого Ρ‚ΠΈΠΏΠ° Π΄Π°Π½Π½Ρ‹Π΅ Π²Π½ΡƒΡ‚Ρ€ΠΈ скобок ΡΠ²Π»ΡΡŽΡ‚ΡΡ константами, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ ΠΌΠΎΠΆΠ΅Ρ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ описываСмая пСрСмСнная. Над Π΄Π°Π½Π½Ρ‹ΠΌΠΈ Ρ‚Π°ΠΊΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° допустимо Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡ‚ΡŒ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΈ Π»ΠΎΠ³ΠΈΡ‡Π΅ΡΠΊΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ (см. Π΄Π°Π»Π΅Π΅). НапримСр, для ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π½ΠΎΠ³ΠΎ Π²Ρ‹ΡˆΠ΅ описания Π΄Π°Π½Π½ΠΎΠ³ΠΎ season Π±ΡƒΠ΄Π΅Ρ‚ истинным высказываниС: «winter < spring» .

ΠŸΡ€ΠΈ Ρ€Π°Π±ΠΎΡ‚Π΅ с Π΄Π°Π½Π½Ρ‹ΠΌΠΈ пСрСчисляСмого Ρ‚ΠΈΠΏΠ° ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ стандартныС Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Succ, Π red, Ord.

Succ (Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚) Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π΅ Π·Π° ΡΠ»Π΅ΠΌΠ΅Π½Ρ‚ΠΎΠΌ, ΡƒΠΊΠ°Π·Π°Π½Π½Ρ‹ΠΌ ΠΊΠ°ΠΊ Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚. Если ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π³ΠΎ элСмСнта Π½Π΅Ρ‚ (Π·Π°ΠΊΠΎΠ½Ρ‡ΠΈΠ»ΠΈΡΡŒ), Ρ‚ΠΎ ΡΡ‚ΠΎ ΠΏΡ€ΠΈΠ²ΠΎΠ΄ΠΈΡ‚ ΠΊ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠΌΡƒ ΠΏΡ€Π΅Ρ€Ρ‹Π²Π°Π½ΠΈΡŽ (ошибкС).

Π red (Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚) Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ ΠΏΡ€Π΅Π΄Ρ‹Π΄ΡƒΡ‰Π΅Π΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΈΠ· ΠΏΠ΅Ρ€Π΅Ρ‡Π½Ρ констант, ΠΈΠ· ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… состоит Π΄Π°Π½Π½Ρ‹ΠΉ Ρ‚ΠΈΠΏ.

Ord (Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚) Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°Π΅Ρ‚ порядковый Π½ΠΎΠΌΠ΅Ρ€ Π°Ρ€Π³ΡƒΠΌΠ΅Π½Ρ‚Π° Π² ΡΠΏΠΈΡΠΊΠ΅ констант, пСрСчислСнных Π² ΠΎΠΏΠΈΡΠ°Π½ΠΈΠΈ Π² Π²ΠΈΠ΄Π΅ Ρ†Π΅Π»ΠΎΠ³ΠΎ числа. Π­Π»Π΅ΠΌΠ΅Π½Ρ‚Ρ‹ ΠΏΡ€ΠΎΠ½ΡƒΠΌΠ΅Ρ€ΠΎΠ²Π°Π½Ρ‹ Π² ΠΏΠΎΡ€ΡΠ΄ΠΊΠ΅ 0,1,2,…, Ρ‚. Π΅. ΠΏΠ΅Ρ€Π²Ρ‹ΠΉ элСмСнт ΠΈΠΌΠ΅Π΅Ρ‚ Π½ΠΎΠΌΠ΅Ρ€ 0.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€:

Π’ΡƒΡ€Π΅ month = ('jan','fab','mar','apr','may','jun','jul','aug','sep','ocf','nov','dec');

Var a, b, c, d, c, mes: month; f, h, g: integer;

Begin mes: =jul;

a: = Pred (mes); {Π² a находится 'jun'}

b: = Succ (mes); {Π² b находится 'aug'}

с: = Pred (pred(mes)); {Π² с Π½Π°Ρ…одится 'mΠ°Ρƒ'}

d: = Succ (succ(mes)); {Π² d находится 'sep'}

e: = Succ (pred (mes)); {Π² Π΅ находится 'jul'}

f: = Ord (mes); {Π² f находится 6}

h: = Ord (pred (mes)); {Π² h находится 5}

g: = Ord (succ (mes)); {Π² g находится 7}

END

Π˜Π½Ρ‚Π΅Ρ€Π²Π°Π»ΡŒΠ½Ρ‹ΠΉ Ρ‚ΠΈΠΏ задаСтся Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ΠΎΠΌ измСнСния констант Π²Π½ΡƒΡ‚Ρ€ΠΈ ΠΊΠ°ΠΊΠΎΠ³ΠΎ-Π»ΠΈΠ±ΠΎ ΡƒΠΆΠ΅ ΠΈΠΌΠ΅ΡŽΡ‰Π΅Π³ΠΎΡΡ пСрСчисляСмого ΠΈΠ»ΠΈ стандартного Ρ‚ΠΈΠΏΠ°, ΠΊΡ€ΠΎΠΌΠ΅ вСщСствСнного (integer, byte, booban, char). Π—Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΏΠ΅Ρ€Π²ΠΎΠΉ константы Π΄ΠΎΠ»ΠΆΠ½ΠΎ Π±Ρ‹Ρ‚ΡŒ мСньшС значСния Π²Ρ‚ΠΎΡ€ΠΎΠΉ константы Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π°.

Π’ΡƒΡ€Π΅

Dni = 1…31;

Litera = 'a',…,'z',

Var Rabdni, bolndni, vuhod: dni; {ΠΌΠΎΠ³ΡƒΡ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ значСния 1−31}

im,ident: litera; {ΠΌΠΎΠ³ΡƒΡ‚ ΠΏΡ€ΠΈΠ½ΠΈΠΌΠ°Ρ‚ΡŒ значСния 'A'-'Z'}

Π’Ρ‹Ρ…ΠΎΠ΄ Π·Π° ΠΏΡ€Π΅Π΄Π΅Π»Ρ‹ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π° Π²Ρ‹Π·Ρ‹Π²Π°Π΅Ρ‚ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ½ΠΎΠ΅ ΠΏΡ€Π΅Ρ€Ρ‹Π²Π°Π½ΠΈΠ΅.

ДопускаСтся Π·Π°Π΄Π°Π½ΠΈΠ΅ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π° ΠΈΠΌΠ΅Π½Π°ΠΌΠΈ констант:

Const min = 1; max = 31;

Π’ΡƒΡ€Π΅ Dni = min… max;

Var rabdni, boldni, vuhoddni: dni;

Для ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΡŒΠ½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° Ρ‚Π°ΠΊΠΆΠ΅ Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Succ, Pred, Ord.

3. Π Π°Π·Π²Π΅Ρ‚Π²Π»ΡΡŽΡ‰ΠΈΠ΅ΡΡ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

3.1. ΠžΠ±Ρ‰ΠΈΠ΅ полоТСния

Π”ΠΎ ΡΠΈΡ… ΠΏΠΎΡ€ ΠΌΡ‹ Ρ€Π°ΡΡΠΌΠ°Ρ‚Ρ€ΠΈΠ²Π°Π»ΠΈ Π»ΠΈΠ½Π΅ΠΉΠ½Ρ‹Π΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌ ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… ΠΌΠΎΠΆΠ½ΠΎ Π±Ρ‹Π»ΠΎ ΠΏΡ€Π΅Π΄ΡΡ‚Π°Π²ΠΈΡ‚ΡŒ Π² Π²ΠΈΠ΄Π΅ Π±Π»ΠΎΠΊ-схСмы (рис. 3.1)

Π’ΠΎΠ·ΠΌΠΎΠΆΠ½Ρ‹ случаи, ΠΊΠΎΠ³Π΄Π° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° вСтвится Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡ‚ΠΈ ΠΎΡ‚ ΠΊΠ°ΠΊΠΎΠ³ΠΎ-Π»ΠΈΠ±ΠΎ условия (см. Ρ€ΠΈΡ. 3.2). Π’Π΅Ρ‚Π²Π»Π΅Π½ΠΈΠ΅ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π΄Π²ΡƒΡ… Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΉ: ΠΏΠΎ ΠΏΡ€ΠΈΠ½Ρ†ΠΈΠΏΡƒ условиС Π²Π΅Ρ€Π½ΠΎ — ΠΈΠ΄Ρ‚ΠΈ ΠΏΠΎ ΠΎΠ΄Π½ΠΎΠΉ Π²Π΅Ρ‚Π²ΠΈ, условиС Π»ΠΎΠΆΠ½ΠΎ — ΠΏΠΎ Π΄Ρ€ΡƒΠ³ΠΎΠΉ. Π’ ΡΡ‚ΠΎΠΌ случаС примСняСтся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ if. Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ Π²Π΅Ρ‚Π²Π»Π΅Π½ΠΈΠ΅ сразу Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΉ: Ссли k=l — ΠΈΠ΄Ρ‚ΠΈ ΠΏΠΎ ΠΎΠ΄Π½ΠΎΠΉ Π²Π΅Ρ‚Π²ΠΈ, Ссли k=2 — ΠΏΠΎ Π΄Ρ€ΡƒΠ³ΠΎΠΉ, k=3 — ΠΏΠΎ Ρ‚Ρ€Π΅Ρ‚ΡŒΠ΅ΠΉ ΠΈ Ρ‚. Π΄. Π² ΡΡ‚ΠΎΠΌ случаС ΡƒΠ΄ΠΎΠ±Π½Π΅Π΅ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Case.

3.2. ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ goto, Ρ€Π°Π·Π΄Π΅Π» описания ΠΌΠ΅Ρ‚ΠΎΠΊ

ΠŸΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠ΅ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π½Π°Ρ€ΡƒΡˆΠ΅Π½ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠΌ ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄Π°. ΠžΠ±Ρ‰ΠΈΠΉ Π²ΠΈΠ΄ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°: goto ΠΌΠ΅Ρ‚ΠΊΠ°; Π³Π΄Π΅ ΠΌΠ΅Ρ‚ΠΊΠ° — Π±ΡƒΠΊΠ²Π°, Π»ΠΈΠ±ΠΎ Ρ†ΠΈΡ„Ρ€Π°, Π»ΠΈΠ±ΠΎ Π½Π°Π±ΠΎΡ€ Π±ΡƒΠΊΠ² ΠΈ Ρ†ΠΈΡ„Ρ€, ΠΈΠ· ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… пСрвая — всСгда Π±ΡƒΠΊΠ²Π°, НапримСр, М1, LI, NK. ΠœΠ΅Ρ‚ΠΊΠ°, стоящая послС goto, ΡƒΠΊΠ°Π·Ρ‹Π²Π°Π΅Ρ‚, ΠΊΡƒΠ΄Π° Π½ΡƒΠΆΠ½ΠΎ ΠΏΠΎΠΉΡ‚ΠΈ. ДостигаСтся это Ρ‚Π΅ΠΌ, Ρ‡Ρ‚ΠΎ Ссли Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ находится ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ goto ΠΌΠ΅Ρ‚ΠΊΠ°; Ρ‚ΠΎ Π² ΡΡ‚ΠΎΠΉ ΠΆΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ ΠΎΠ±ΡΠ·Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ имССтся ΠΊΠ°ΠΊΠΎΠΉ-Π»ΠΈΠ±ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Π²ΠΈΠ΄Π° ΠΌΠ΅Ρ‚ΠΊΠ°: ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€; ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ считаСтся ΠΏΠΎΠΌΠ΅Ρ‡Π΅Π½Π½Ρ‹ΠΌ, ΠΈ ΠΌΠ°ΡˆΠΈΠ½Π°, встрСтив goto ΠΌΠ΅Ρ‚ΠΊΠ°; Π½Π΅ Π±ΡƒΠ΄Π΅Ρ‚ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡ‚ΡŒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, записанный послС ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° goto ΠΌΠ΅Ρ‚ΠΊΠ°; Π° ΠΏΠ΅Ρ€Π΅ΠΉΠ΄Π΅Ρ‚ ΠΊ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΡŽ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° ΠΌΠ΅Ρ‚ΠΊΠ°: ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€;

Π˜Π»Π»ΡŽΡΡ‚Ρ€Π°Ρ†ΠΈΡ:

а: = b+с;

с: = sgrt (a+exp(b));

goto M1;

z: = x+y;

writeln (z);

M1: S: = P;

Π’ ΡΠ»ΡƒΡ‡Π°Π΅, Ссли Π±Ρ‹ Π½Π΅ Π±Ρ‹Π»ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° goto М1; всС ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ»ΠΈΡΡŒ Π±Ρ‹ ΠΏΠΎΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ ΠΎΠ΄ΠΈΠ½ Π·Π° Π΄Ρ€ΡƒΠ³ΠΈΠΌ. здСсь ΠΆΠ΅ послС ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° с: =… стоит goto М1; ΡΠ»Π΅Π΄ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ, машина Π½Π΅ Π±ΡƒΠ΄Π΅Ρ‚ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΡ‚ΡŒ z:=… ΠΈ writeln…, Π° ΡΡ€Π°Π·Ρƒ послС с: =… ΠΏΠ΅Ρ€Π΅ΠΉΠ΄Π΅Ρ‚ ΠΊ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΡŽ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° М: S: = Π ;

ΠœΠ΅Ρ‚ΠΊΠΈ, примСняСмыС Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅, Π΄ΠΎΠ»ΠΆΠ½Ρ‹ Π±Ρ‹Ρ‚ΡŒ описаны Π² Ρ€Π°Π·Π΄Π΅Π»Π΅ описания ΠΌΠ΅Ρ‚ΠΎΠΊ, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ ΠΆΠ΅Π»Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎ ΡΡ‚Π°Π²ΠΈΡ‚ΡŒ ΠΏΠ΅Ρ€Π²Ρ‹ΠΌ срСди описаний. Выглядит Ρ€Π°Π·Π΄Π΅Π» Ρ‚Π°ΠΊ: Label М1, М2, L, NK; Ρ‚. Π΅. послС слова Label ΠΏΠ΅Ρ€Π΅Ρ‡ΠΈΡΠ»ΡΡŽΡ‚ΡΡ Ρ‡Π΅Ρ€Π΅Π· Π·Π°ΠΏΡΡ‚ΡƒΡŽ всС ΠΌΠ΅Ρ‚ΠΊΠΈ, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π±ΡƒΠ΄ΡƒΡ‚ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒΡΡ Π² Π΄Π°Π½Π½ΠΎΠΌ Π±Π»ΠΎΠΊΠ΅ (ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅). ЗаканчиваСтся описаниС символом ';'.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€: ΡΠΎΡΡ‚Π°Π²ΠΈΡ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ, Π²Ρ‹Ρ‡ΠΈΡΠ»ΡΡŽΡ‰ΡƒΡŽ значСния Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ cos Ρ…, Π³Π΄Π΅ Π½Π°Ρ‡Π°Π»ΡŒΠ½ΠΎΠ΅ Ρ… = 0, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π΅ Ρ… = 0.01 ΠΈ Ρ‚. Π΄.

Program Prim3; Label M; Var x: real; BEGIN x:=0; M: writeln ('x=', x,'cos x = ', cos (x)); x:=x+0.01;

goto M; readln; END.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π±ΡƒΠ΄Π΅Ρ‚ Ρ€Π°Π±ΠΎΡ‚Π°Ρ‚ΡŒ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ: Ρ… присвоится Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ 0; writeln Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ Π½Π° ΡΠΊΡ€Π°Π½ тСкст, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ ΡƒΠΊΠ°Π·Π°Π½ Π² ΠΏΠ΅Ρ€Π²Ρ‹Ρ… ΠΊΠ°Π²Ρ‹Ρ‡ΠΊΠ°Ρ… Ρ… =, Π΄Π°Π»Π΅Π΅ ΠΈΠ·Π²Π»Π΅Ρ‡Π΅Ρ‚ ΠΈΠ· ΡΡ‡Π΅ΠΉΠΊΠΈ Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΈ Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ Π΅Π³ΠΎ Π½Π° ΡΠΊΡ€Π°Π½; Π·Π°Ρ‚Π΅ΠΌ снова Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ тСкст cos Ρ… =, Π·Π°Ρ‚Π΅ΠΌ вычислит Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ cos Ρ… ΠΈ Π²Ρ‹Π΄Π°ΡΡ‚ Π΅Π³ΠΎ Π½Π° ΡΠΊΡ€Π°Π½, Ρ‚. Π΅. машина Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ ΠΏΠ΅Ρ€Π²ΡƒΡŽ строку Π² Π²ΠΈΠ΄Π΅

x = 0.0Π• + 00 cos Ρ… = 9.9 999 999 999Π• — 01.

ПослС этого Π²ΠΎΠ·ΡŒΠΌΠ΅Ρ‚ΡΡ Ρ‚ΠΎ Ρ…, ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ΅ Π±Ρ‹Π»ΠΎ ΠΈΠ·Π²Π»Π΅Ρ‡Π΅Π½ΠΎ ΠΈΠ· ΡΡ‡Π΅ΠΉΠΊΠΈ памяти Ρ… (ΠΏΡ€Π΅ΠΆΠ½Π΅Π΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Ρ…), Ρ‚. Π΅. 0.0, ΠΊ Π½Π΅ΠΌΡƒ прибавляСтся Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Π° 0.01 ΠΈ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ снова занСсСтся Π² ΡΡ‡Π΅ΠΉΠΊΡƒ памяти Ρ… Ρ‚Π°ΠΊ, Ρ‡Ρ‚ΠΎ Π² Ρ… Π±ΡƒΠ΄Π΅Ρ‚ 0.01, послС этого ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ goto m; пСрСдаст ΡƒΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρƒ, ΠΏΠΎΠΌΠ΅Ρ‡Π΅Π½Π½ΠΎΠΌΡƒ ΠΌΠ΅Ρ‚ΠΊΠΎΠΉ ΠΌ, Ρ‚. Π΅. ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρƒ writeln, ΠΈ ΠΌΠ°ΡˆΠΈΠ½Π° выдаст Π½ΠΎΠ²ΡƒΡŽ строку:

x = 1.0Π• — 02 cos Ρ… = 9.9 995 000 041Π• — 01;

— Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€

Ρ…: =x + 0.01, ΠΏΠΎΠ»ΡƒΡ‡ΠΈΡ‚ Ρ… = 0.02;

— Π²Ρ‹Π²Π΅Π΄Π΅Ρ‚ строку

x = 2.0Π• — 02 cos Ρ… = 9.9 980 000 666Π• — 01;

— ΡΠ΄Π΅Π»Π°Π΅Ρ‚ Ρ… = 0.03 ΠΈ Ρ‚. Π΄., Π΄ΠΎ Π±Π΅ΡΠΊΠΎΠ½Π΅Ρ‡Π½ΠΎΡΡ‚ΠΈ, Ρ‚Π°ΠΊ ΠΊΠ°ΠΊ Π² Π΄Π°Π½Π½ΠΎΠΌ Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ΅ ΠΎΠΊΠΎΠ½Ρ‡Π°Π½ΠΈΠ΅ Ρ€Π°Π±ΠΎΡ‚Ρ‹ Π½Π΅ ΠΏΡ€Π΅Π΄ΡƒΡΠΌΠΎΡ‚Ρ€Π΅Π½ΠΎ. Для Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΡ Ρ€Π°Π±ΠΎΡ‚Ρ‹ слСдуСт ΠΏΡ€ΠΈΠΌΠ΅Π½ΠΈΡ‚ΡŒ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ if.

3.3. ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ if

ΠžΠ±Ρ‰ΠΈΠΉ Π²ΠΈΠ΄: If Π±ΡƒΠ»Π΅Π²ΡΠΊΠΎΠ΅ Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ then ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ else ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€;

Π Π°Π±ΠΎΡ‚Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°: Π²Π½Π°Ρ‡Π°Π»Π΅ вычисляСтся булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ³ΠΎ Π² ΠΊΠΎΠ½Π΅Ρ‡Π½ΠΎΠΌ ΠΈΡ‚ΠΎΠ³Π΅ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ TRUE ΠΈΠ»ΠΈ FALSE. Если булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ TRUE, Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° ΡΠ»ΠΎΠ²ΠΎΠΌ then, Π° Π·Π°Ρ‚Π΅ΠΌ происходит ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄ ΠΊ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρƒ, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌΡƒ Π·Π° if. Если булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ false, Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° ΡΠ»ΠΎΠ²ΠΎΠΌ else, Π·Π°Ρ‚Π΅ΠΌ происходит ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄ ΠΊ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρƒ, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌΡƒ Π·Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠΌ if.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅: послС ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π³ΠΎ Π·Π° then, ΠΏΠ΅Ρ€Π΅Π΄ else символ ';' Π½Π΅ ΡΡ‚авится, Ρ‚Π°ΠΊ ΠΊΠ°ΠΊ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ if Π΅Ρ‰Π΅ здСсь Π½Π΅ Π·Π°ΠΊΠΎΠ½Ρ‡Π΅Π½, Π° ';' ставится послС окончания ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°. Π’ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½Π΅Π½ΠΈΠ΅ сокращСнного ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π° if:

If Π±ΡƒΠ»Π΅Π²ΡΠΊΠΎΠ΅ Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ then ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€;

Π—Π΄Π΅ΡΡŒ, Ссли булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ true, выполняСтся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° ΡΠ»ΠΎΠ²ΠΎΠΌ then, ΠΈ ΠΏΡ€ΠΎΠΈΡΡ…ΠΎΠ΄ΠΈΡ‚ ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄ ΠΊ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρƒ, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌΡƒ Π·Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠΌ if. Если булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ false, Ρ‚ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ if игнорируСтся (Π²ΠΎΠΎΠ±Ρ‰Π΅ Π½Π΅ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся), Π° Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° if.

ΠŸΠ΅Ρ€Π΅Π΄Π΅Π»Π°Π΅ΠΌ «Π±Π΅ΡΠΊΠΎΠ½Π΅Ρ‡Π½ΡƒΡŽ» ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ ΠΏ. 3.2. Π² Ρ‚Π°ΠΊΡƒΡŽ, которая остановится Ρ‚ΠΎΠ³Π΄Π°, ΠΊΠΎΠ³Π΄Π° Ρ… станСт Ρ€Π°Π²Π½Ρ‹ΠΌ 0.1.

Program Prim4; Label M; Var x: real;

BEGIN x:=0;

M: writeln ('x=', x,' cos x = ', cos (x));

x:=x+0.01;

if x<=0.1 then goto M; readln;

END.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° Π²Ρ‹Π΄Π°Π΅Ρ‚ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚Ρ‹ вычислСний cos (x) для Ρ… = 0.01, 0.02, 0.03 ΠΈ Ρ‚. Π΄., Π΄ΠΎ 0.01.

Π’ ΠΏΠΎΡΠ»Π΅Π΄Π½Π΅ΠΉ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ Ρ… < = 0.1. КакиС Π±Ρ‹Π²Π°ΡŽΡ‚ булСвскиС выраТСния? Π’ΠΎΠΎΠ±Ρ‰Π΅ говоря, булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ послС вычислСния всСгда истинно ΠΈΠ»ΠΈ Π»ΠΎΠΆΠ½ΠΎ, Ρ‚. Π΅. TRUE ΠΈΠ»ΠΈ FALSE. Π”Π΅ΠΉΡΡ‚Π²ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎ, Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ Ρ… < = 0.1 ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ истинно, Ссли Ρ… мСньшС ΠΈΠ»ΠΈ Ρ€Π°Π²Π½ΠΎ 0.1, ΠΈ Π»ΠΎΠΆΠ½ΠΎ — Π² ΠΏΡ€ΠΎΡ‚ΠΈΠ²Π½ΠΎΠΌ случаС. Π’ΠΎΠΎΠ±Ρ‰Π΅ булСвскоС Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ ΠΌΠΎΠΆΠ΅Ρ‚ ΡΡ‚Ρ€ΠΎΠΈΡ‚ΡŒΡΡ ΠΈΠ· Π±ΡƒΠ»Π΅Π²ΡΠΊΠΈΡ… констант TRUE ΠΈ FALSE; ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… булСвского Ρ‚ΠΈΠΏΠ° (Π² ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Ρ… ΠΌΠΎΠ³ΡƒΡ‚ Ρ…Ρ€Π°Π½ΠΈΡ‚ΡŒΡΡ TRUE ΠΈΠ»ΠΈ FALSE); ΠΎΠ±Ρ€Π°Ρ‰Π΅Π½ΠΈΠΉ ΠΊ Ρ„ункциям, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹Π΅ Π²ΠΎΠ·Π²Ρ€Π°Ρ‰Π°ΡŽΡ‚ TRUE ΠΈΠ»ΠΈ FALSE ΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΠΉ, соСдинСнных ΠΌΠ΅ΠΆΠ΄Ρƒ собой булСвскими опСрациями ΠΈ ΠΊΡ€ΡƒΠ³Π»Ρ‹ΠΌΠΈ скобками.

Π—Π΄Π΅ΡΡŒ слСдуСт Ρ€Π°ΡΡˆΠΈΡ„Ρ€ΠΎΠ²Π°Ρ‚ΡŒ, Ρ‡Ρ‚ΠΎ Ρ‚Π°ΠΊΠΎΠ΅ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΈ Π±ΡƒΠ»Π΅Π²ΡΠΊΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ. ΠŸΡ€ΠΈΠΌΠ΅Ρ€ΠΎΠΌ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π½ΠΎΠ΅ Π²Ρ‹ΡˆΠ΅ Ρ… < = 0.01, Ρ‚. Π΅. Π² ΠΎΠ±Ρ‰Π΅ΠΌ случаС ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΠ΅ — это Π΄Π²Π° арифмСтичСских выраТСния, соСдинСнных ΠΌΠ΅ΠΆΠ΄Ρƒ собой опСрациями ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ. ΠžΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ: = (Ρ€Π°Π²Π½ΠΎ), < > (Π½Π΅Ρ€Π°Π²Π½ΠΎ), > (большС), > = (большС ΠΈΠ»ΠΈ Ρ€Π°Π²Π½ΠΎ), < (мСньшС), < = (мСньшС ΠΈΠ»ΠΈ Ρ€Π°Π²Π½ΠΎ).

ΠŸΡ€ΠΈΠΌΠ΅Ρ€ ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΠΉ: Π° + b < = sin (c)

exp (p) > (cos (i) — a)/sgr (b).

Как ΠΌΡ‹ ΡƒΠΆΠ΅ Π³ΠΎΠ²ΠΎΡ€ΠΈΠ»ΠΈ, эти ΠΎΡ‚Π½ΠΎΡˆΠ΅Π½ΠΈΡ ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ истинны ΠΈΠ»ΠΈ Π»ΠΎΠΆΠ½Ρ‹ Π² Π·Π°Π²ΠΈΡΠΈΠΌΠΎΡΡ‚ΠΈ ΠΎΡ‚ ΠΊΠΎΠ½ΠΊΡ€Π΅Ρ‚Π½ΠΎΠ³ΠΎ значСния Π²Π΅Π»ΠΈΡ‡ΠΈΠ½, Π² Π½ΠΈΡ… входящих, Π½Π° ΠΌΠΎΠΌΠ΅Π½Ρ‚ вычислСния.

ЛогичСскиС ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ — это Π½Π°ΠΌ ΡƒΠΆΠ΅ извСстныС. Напомним, ΠΊΠ°ΠΊ ΠΎΠ½ΠΈ Ρ€Π°Π±ΠΎΡ‚Π°ΡŽΡ‚: or (ΠΈΠ»ΠΈ), and (ΠΈ).

Π˜ΠΌΠ΅Π΅Ρ‚ΡΡ описаниС Var A, B: boobean;

Or — логичСскоС слоТСниС, читаСтся ΠΊΠ°ΠΊ «ΠΈΠ»ΠΈ». Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ — истина, Ссли ΠΈΠ»ΠΈ А, ΠΈΠ»ΠΈ Π’ — истина, ΠΈ Π»ΠΎΠΆΡŒ, Ссли, А ΠΈ B Π»ΠΎΠΆΠ½Ρ‹.

НапримСр: А Π’, А ΠΎΠ³ Π’

true true true

true false true

false true true

false false false

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅: данная опСрация Π°Π½Π°Π»ΠΎΠ³ΠΈΡ‡Π½Π° арифмСтичСской OR, Ссли TRUE Π·Π°ΠΌΠ΅Π½ΠΈΡ‚ΡŒ 1, Π° FALSE — 0.

АND — логичСскоС ΡƒΠΌΠ½ΠΎΠΆΠ΅Π½ΠΈΠ΅, читаСтся «ΠΈ». Π Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΈ — истина Ρ‚ΠΎΠ»ΡŒΠΊΠΎ Ρ‚ΠΎΠ³Π΄Π°, ΠΊΠΎΠ³Π΄Π° ΠΈ А, ΠΈ Π’ — истина, Π² ΠΎΡΡ‚Π°Π»ΡŒΠ½Ρ‹Ρ… случаях Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ — лоТь.

А Π’ A and B

true true true

true false false

false true false

false false false

ΠšΡ€ΠΎΠΌΠ΅ Ρ‚ΠΎΠ³ΠΎ, ΡƒΠ΄ΠΎΠ±Π½ΠΎ ΠΏΡ€ΠΈΠΌΠ΅Π½ΡΡ‚ΡŒ ΠΎΠ΄Π½ΠΎΠΊΠΎΠΌΠΏΠΎΠ½Π΅Π½Ρ‚Π½ΡƒΡŽ ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΡŽ Not, которая вводится ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΌ ΠΎΠ±Ρ€Π°Π·ΠΎΠΌ: Ссли, А Π΅ΡΡ‚ΡŒ TRUE, Ρ‚ΠΎ Not, А Π΅ΡΡ‚ΡŒ FALSE ΠΈ Π΅ΡΠ»ΠΈ, А Π΅ΡΡ‚ΡŒ FALSE, Ρ‚ΠΎ Not, А Π΅ΡΡ‚ΡŒ TRUE.

Π‘ ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ этих ΠΎΠΏΠ΅Ρ€Π°Ρ†ΠΈΠΉ ΠΌΠΎΠΆΠ½ΠΎ ΠΏΠΎΡΡ‚Ρ€ΠΎΠΈΡ‚ΡŒ условия любой слоТности. НапримСр, ΠΏΡƒΡΡ‚ΡŒ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ Ρ€Π΅ΡˆΠΈΡ‚ΡŒ Π·Π°Π΄Π°Ρ‡Ρƒ:

НапишСм ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡƒ:

Program Prim5;

Var a, x: real;

BEGIN

writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Π°, Ρ…'); readln (a, x);

if (a>0) and (x>0) and (x<=0.5) then

writeln ('z=', a*sqr (x)/sin (x)) else

if (a>0) and (x>=0.5) and (x<3) then

writeln ('z=', exp (x)) else

if (a<=0) or (x<=0) then

writeln ('z=', sqrt (a)*sqrt (x)/sin (x)) else

writeln ('z=0');

readln; END.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅: Π² ΠΏΠΎΡΠ»Π΅Π΄Π½Π΅ΠΌ ΠΏΡ€ΠΈΠΌΠ΅Ρ€Π΅ ΠΌΡ‹ Π²ΠΈΠ΄ΠΈΠΌ, Ρ‡Ρ‚ΠΎ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹ if ΠΌΠΎΠ³ΡƒΡ‚ Π±Ρ‹Ρ‚ΡŒ Π²Π»ΠΎΠΆΠ΅Π½Ρ‹ Π΄Ρ€ΡƒΠ³ Π² Π΄Ρ€ΡƒΠ³Π°. Π’ΠΊΠ»Π°Π΄Ρ‹Π²Π°Ρ‚ΡŒ ΠΈΡ… ΠΌΠΎΠΆΠ½ΠΎ Π½Π΅ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½ΠΎΠ΅ количСство Ρ€Π°Π·, ΠΏΡ€ΠΈΡ‡Π΅ΠΌ Π½ΠΎΠ²Ρ‹ΠΉ if ΠΌΠΎΠΆΠ΅Ρ‚ Π½Π°Ρ‡ΠΈΠ½Π°Ρ‚ΡŒΡΡ ΠΊΠ°ΠΊ послС слова then, Ρ‚Π°ΠΊ ΠΈ ΠΏΠΎΡΠ»Π΅ слова else.

Π•Ρ‰Π΅ ΠΎΠ΄ΠΈΠ½ ΠΏΡ€ΠΈΠΌΠ΅Ρ€: ΠΏΡƒΡΡ‚ΡŒ Π΄Π°Π½Π° ΠΎΠ±Π»Π°ΡΡ‚ΡŒ (Π·Π°ΡˆΡ‚Ρ€ΠΈΡ…ΠΎΠ²Π°Π½Π½Π°Ρ Π½Π° Ρ€ΠΈΡ. 3.3). ΠœΡ‹ Π²Π²ΠΎΠ΄ΠΈΠΌ с ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Ρ‚ΠΎΡ‡ΠΊΠΈ. Машина Π΄ΠΎΠ»ΠΆΠ½Π° ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ, ΠΏΡ€ΠΈΠ½Π°Π΄Π»Π΅ΠΆΠΈΡ‚ Π»ΠΈ данная Ρ‚ΠΎΡ‡ΠΊΠ° этой области ΠΈΠ»ΠΈ Π½Π΅Ρ‚.

РазобьСм ΠΎΠ±Π»Π°ΡΡ‚ΡŒ рис. 3.3 Π½Π° Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΎ простых:

1. ВнутрСнняя Ρ‡Π°ΡΡ‚ΡŒ сСктора, ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½ΠΎΠ³ΠΎ ΠΎΡ‚Ρ€ΠΈΡ†Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠΉ Ρ‡Π°ΡΡ‚ΡŒΡŽ оси OX, ΠΏΠΎΠ»ΠΎΠΆΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎΠΉ OY ΠΈ ΠΎΠΊΡ€ΡƒΠΆΠ½ΠΎΡΡ‚ΡŒΡŽ с Ρ†Π΅Π½Ρ‚Ρ€ΠΎΠΌ Π² Π½Π°Ρ‡Π°Π»Π΅ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚ ΠΈ Ρ€Π°Π΄ΠΈΡƒΡΠΎΠΌ, Ρ€Π°Π²Π½Ρ‹ΠΌ 2.

2. ΠŸΡ€ΡΠΌΠΎΡƒΠ³ΠΎΠ»ΡŒΠ½ΠΈΠΊ, ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½Ρ‹ΠΉ осями OX, OY ΠΈ ΠΏΡ€ΡΠΌΡ‹ΠΌΠΈ x=4, y=2.

3. ΠŸΡ€ΡΠΌΠΎΡƒΠ³ΠΎΠ»ΡŒΠ½ΠΈΠΊ, ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½Ρ‹ΠΉ осями OX, ОУ ΠΈ ΠΏΡ€ΡΠΌΡ‹ΠΌΠΈ x=-2, y=-4.

4. ВнутрСнняя Ρ‡Π°ΡΡ‚ΡŒ сСктора, ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½ΠΎΠ³ΠΎ ΠΏΠΎΠ»ΠΎΠΆΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎΠΉ Ρ‡Π°ΡΡ‚ΡŒΡŽ оси OX, ΠΎΡ‚Ρ€ΠΈΡ†Π°Ρ‚Π΅Π»ΡŒΠ½ΠΎΠΉ OY ΠΈ ΠΎΠΊΡ€ΡƒΠΆΠ½ΠΎΡΡ‚ΡŒΡŽ с Ρ†Π΅Π½Ρ‚Ρ€ΠΎΠΌ Π² Π½Π°Ρ‡Π°Π»Π΅ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚ ΠΈ Ρ€Π°Π΄ΠΈΡƒΡΠΎΠΌ, Ρ€Π°Π²Π½Ρ‹ΠΌ 3.

5. ВнутрСнняя Ρ‡Π°ΡΡ‚ΡŒ ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚Π°, ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½Π½ΠΎΠ³ΠΎ прямыми линиями x=2, x=3, y=-3, y=-4.

6. ΠžΠ±Π»Π°ΡΡ‚ΡŒ, лСТащая Π²Π½ΡƒΡ‚Ρ€ΠΈ окруТности с Ρ†Π΅Π½Ρ‚Ρ€ΠΎΠΌ x=5, y=-3 ΠΈ Ρ€Π°Π΄ΠΈΡƒΡΠΎΠΌ= 1,5.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ°:

Program Prim6;

Label N, K, L;

Var x, y: real; f: char;

BEGIN N: writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Ρ‚ΠΎΡ‡ΠΊΠΈ');

readln (x); writeln ('x=', x);

readln (y); writeln ('y=', y);

if (x<=0) and (y>=0) and (sqr (x)+sqr (y)<=4) {1-я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

or (x>=0) and (x<4) and (y>=0) and (y<=2) {2- я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

or (x<=0) and (x>=-2) and (y<=0) and (y>=-4) {3- я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

or (x>=0) and (y<=0) and (sqr (x)+sqr (y)<=9) {4- я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

or (x>=2) and (x<=3) and (y<=-3) and (y>=-4) {5- я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

or (sqr (x-5)+sqr (y+3)<=2.25) {6- я ΠΎΠ±Π»Π°ΡΡ‚ΡŒ}

then writeln ('Ρ‚ΠΎΡ‡ΠΊΠ° с ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Π°ΠΌΠΈ Ρ…=', x,' y=', y, 'ΠΏΡ€ΠΈΠ½Π°Π΄Π»Π΅ΠΆΠΈΡ‚ области')

else writeln ('Ρ‚ΠΎΡ‡ΠΊΠ° с ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Π°ΠΌΠΈ Ρ…=', x,' y=', y, 'Π½Π΅ ΠΏΡ€ΠΈΠ½Π°Π΄Π»Π΅ΠΆΠΈΡ‚ оласти);

L: writeln ('Π±ΡƒΠ΄Π΅ΠΌ Π»ΠΈ Π΅Ρ‰Ρ‘ Π²Π²ΠΎΠ΄ΠΈΡ‚ΡŒ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚Ρ‹ Ρ‚ΠΎΡ‡ΠΊΠΈ?, Y, N'); readln (f);

if (f='Y') or (f='y') then goto N else

if (f='N') or (f='n') then goto K else

writeln ('Π½Π΅ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ Π½Π°ΠΆΠ°Π»ΠΈ ΠΊΠ»Π°Π²ΠΈΡˆΡƒ, ΠΏΠΎΠΏΡ€ΠΎΠ±ΡƒΠΉΡ‚Π΅ Π΅Ρ‰Ρ‘ Ρ€Π°Π·'); goto L;

K: readln; End.

Π—Π°ΠΌΠ΅Ρ‡Π°Π½ΠΈΠ΅: для Ρ‚ΠΎΠ³ΠΎ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΠΎΡΡ‚Ρ€ΠΎΠΈΡ‚ΡŒ ΠΎΠ±Π»Π°ΡΡ‚ΡŒ, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌ Π·Π΄Ρ€Π°Π²Ρ‹ΠΉ смысл ΠΈ ΡΠ»Π΅ΠΌΠ΅Π½Ρ‚Π°Ρ€Π½Ρ‹Π΅ знания аналитичСской Π³Π΅ΠΎΠΌΠ΅Ρ‚Ρ€ΠΈΠΈ. Π’Π°ΠΊ, Ρ…>=0 опрСдСляСт ΠΎΠ±Π»Π°ΡΡ‚ΡŒ (рис. 3.4)

x>=0 and x<=4 опрСдСляСт полосу (рис. 3.5)

Вспомнив, Ρ‡Ρ‚ΠΎ ΡƒΡ€Π°Π²Π½Π΅Π½ΠΈΠ΅ окруТности с Ρ†Π΅Π½Ρ‚Ρ€ΠΎΠΌ Π² Π½Π°Ρ‡Π°Π»Π΅ ΠΊΠΎΠΎΡ€Π΄ΠΈΠ½Π°Ρ‚ x2+y2=r2, ΠΈΠΌΠ΅Π΅ΠΌ x2+y24 (рис. 3.6),

x 0 являСтся ΠΏΠΎΠ»ΡƒΠΏΠ»ΠΎΡΠΊΠΎΡΡ‚ΡŒΡŽ (рис. 3.7),

y 0 опрСдСляСт ΠΏΠΎΠ»ΡƒΠΏΠ»ΠΎΡΠΊΠΎΡΡ‚ΡŒ (рис. 3.8),

x 0 and y 0 Π΅ΡΡ‚ΡŒ ΠΊΠ²Π°Π΄Ρ€Π°Π½Ρ‚ (рис. 3.9)

ΠΈ, Π½Π°ΠΊΠΎΠ½Π΅Ρ†,

x 0 and y 0 and sqr (x)+sqr (y)4 Π΅ΡΡ‚ΡŒ сСгмСнт (рис. 3.10)

3.4. ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ case (ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Π²Ρ‹Π±ΠΎΡ€Π°)

ΠžΠ±Ρ‰ΠΈΠΉ Π²ΠΈΠ΄:

Case Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ — сСлСктор of

Бписок констант Π²Ρ‹Π±ΠΎΡ€Π° 1: ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ 1;

Бписок констант Π²Ρ‹Π±ΠΎΡ€Π° 2: ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ 2 ;

— — - - - - - - - - - - - - - - - - - - - - - - - -

Бписок констант Π²Ρ‹Π±ΠΎΡ€Π° n ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ n;

else ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ end;

Π—Π΄Π΅ΡΡŒ Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅-сСлСктор Π΅ΡΡ‚ΡŒ Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅, ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ΅ послС выполнСния ΠΈΠΌΠ΅Π΅Ρ‚ любоС скалярноС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅, ΠΊΡ€ΠΎΠΌΠ΅ вСщСствСнного (Ρ‚ΠΈΠΏΡ‹ Π΄Π°Π½Π½Ρ‹Ρ…; Ρ€Π°Π·Π΄. 2.6.), Ρ‚. Π΅. Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅-сСлСктор ΠΌΠΎΠΆΠ΅Ρ‚ Π±Ρ‹Ρ‚ΡŒ Π±Π°ΠΉΡ‚ΠΎΠ²ΠΎΠ³ΠΎ, Ρ†Π΅Π»ΠΎΠ³ΠΎ, логичСского, символьного, пСрСчисляСмого ΠΈ ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΡŒΠ½ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠΎΠ².

Бписок констант Π²Ρ‹Π±ΠΎΡ€Π° состоит ΠΈΠ· ΠΏΠ΅Ρ€Π΅Ρ‡Π½Ρ констант, Ρ€Π°Π·Π΄Π΅Π»Π΅Π½Π½Ρ‹Ρ… запятыми, Π»ΠΈΠ±ΠΎ ΠΈΠ· ΠΊΠΎΠ½ΡΡ‚Π°Π½Ρ‚, Π·Π°Π΄Π°Π½Π½Ρ‹Ρ… ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΠΎΠΌ, Π»ΠΈΠ±ΠΎ ΠΈΠ· ΠΊΠΎΠΌΠ±ΠΈΠ½Π°Ρ†ΠΈΠΉ пСрСчня констант ΠΈ ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»ΠΎΠ². Π’ΠΈΠΏ констант Π² ΡΠΏΠΈΡΠΊΠ°Ρ… Case Π΄ΠΎΠ»ΠΆΠ΅Π½ ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ Ρ‚ΠΈΠΏΡƒ выраТСния сСлСктор. ЗначСния констант Π² ΡΠΏΠΈΡΠΊΠ°Ρ… Π½Π΅ Π΄ΠΎΠ»ΠΆΠ½Ρ‹ ΠΏΠΎΠ²Ρ‚ΠΎΡ€ΡΡ‚ΡŒΡΡ.

Π Π°Π±ΠΎΡ‚Π° ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π°. Π²Π½Π°Ρ‡Π°Π»Π΅ вычисляСтся Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅-сСлСктор, Π·Π°Ρ‚Π΅ΠΌ ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½ΠΎΠ΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ сравниваСтся с ΠΊΠΎΠ½ΡΡ‚Π°Π½Ρ‚Π°ΠΌΠΈ Π²Ρ‹Π±ΠΎΡ€Π°, ΠΈ, Ссли Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ выраТСния-сСлСктора совпадаСт с ΠΊΠ°ΠΊΠΎΠΉ-Π»ΠΈΠ±ΠΎ константой Π²Ρ‹Π±ΠΎΡ€Π°, Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, стоящий послС списка констант, Π² ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΌ Π΅ΡΡ‚ΡŒ константа, ΡΠΎΠ²ΠΏΠ°Π΄Π°ΡŽΡ‰Π°Ρ со Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ΠΌ выраТСния-сСлСктора. Ссли Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ выраТСния-сСлСктора Π½Π΅ ΡΠΎΠ²ΠΏΠ°Π΄Π°Π΅Ρ‚ Π½ΠΈ Ρ ΠΎΠ΄Π½ΠΎΠΉ ΠΈΠ· ΠΊΠΎΠ½ΡΡ‚Π°Π½Ρ‚ Π²Ρ‹Π±ΠΎΡ€Π°, Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€, ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° else. Else ΠΌΠΎΠΆΠ΅Ρ‚ Π² Case ΠΎΡ‚ΡΡƒΡ‚ΡΡ‚Π²ΠΎΠ²Π°Ρ‚ΡŒ, Ρ‚ΠΎΠ³Π΄Π° Π² ΡΠ»ΡƒΡ‡Π°Π΅ нСсовпадСния констант ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ Case игнорируСтся.

ΠŸΡ€ΠΈΠΌΠ΅Ρ€Ρ‹:

1. Π‘Π΅Π»Π΅ΠΊΡ‚ΠΎΡ€ Ρ†Π΅Π»ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°, список констант прСдставлСны ΠΏΠ΅Ρ€Π΅Ρ‡Π½Π΅ΠΌ констант:

Program Prim7;Var i, z: integer;BEGIN writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Ρ†Π΅Π»ΠΎΠ΅ i'); readln (i);

Case i of

1,2,5: writeln ('i=', i,' z=', i+10);

12,16: writeln ('i=', i,' z=', i+100);

31,35,46: writeln ('i=', i,' z=', i+1000);

else writeln('Π½Π΅ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ Π·Π°Π΄Π°Π½ΠΎ i'); end;

readln; END.

2. Π‘Π΅Π»Π΅ΠΊΡ‚ΠΎΡ€ Ρ†Π΅Π»ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ° — список констант прСдставлСн Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ΠΎΠΌ.

вводится Ρ†Π΅Π»ΠΎΠ΅ i, ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΠΈΡ‚ΡŒ, находится Π»ΠΈ ΠΎΠ½ΠΎ Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ 1−10 ΠΈΠ»ΠΈ 11−100, ΠΈΠ»ΠΈ 101−1000, Π»ΠΈΠ±ΠΎ Π²Π½Π΅ этих Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ΠΎΠ².

Program Prim8;Var i: integer;BEGIN writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Ρ†Π΅Π»ΠΎΠ΅ i'); readln (i); Case i of

1.10: writeln (' число Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ 1−10');

11.100: writeln (' число Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ 11−100');

101.1000: writeln (' число Π² Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π΅ 101−1000');

else writeln (' число Π²Π½Π΅ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½Π° 1−1000'); end;

readln; END.

3. Π‘Π΅Π»Π΅ΠΊΡ‚ΠΎΡ€ Ρ†Π΅Π»ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°, список констант прСдставлСны ΠΏΠ΅Ρ€Π΅Ρ‡Π½Π΅ΠΌ констант ΠΈ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ΠΎΠΌ:

Program Prim9; Var i: integer; x, m, a, b, c, d: real; BEGIN writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ i'); readln (i); writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ значСния x, m, a, b, c, d');

readln (x, m, a, b, c, d);

Case i of

1,2,4,8,11.20,24,28,30: writeln ('y=',(x+1)/(sqr (x)+2)-ln (m)+2a/b);

31,45.55: writeln ('y=',(sqr (a)+m)/sqrt (b+m)-3ab/c+d);

58,60,63.76,78,93,100: writeln ('y=', sqr (x)-ax+sqr (sin (ax)-exp (x))

/(1-ln (sqr (x)-exp (Ρ…/2))));

else writeln('Π½Π΅ΠΏΡ€Π°Π²ΠΈΠ»ΡŒΠ½ΠΎ Π·Π°Π΄Π°Π½ΠΎ i'); end;

readln; END.

4. Π‘Π΅Π»Π΅ΠΊΡ‚ΠΎΡ€ Π·Π½Π°ΠΊΠΎΠ²ΠΎΠ³ΠΎ Ρ‚ΠΈΠΏΠ°:

Program Prim10; Var name: char;

BEGIN writeln ('Π²Π²Π΅Π΄ΠΈΡ‚Π΅ ΡˆΠΈΡ„Ρ€'); readln (name);

Case name of

'S','s': writeln(' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ самолСтои вСртолСтостроСния');

'D','d': writeln(' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ авиадвигатСлСстороСния');

'Y','y': writeln (' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ систСм управлСния');

'L','l': writeln (' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ Π»Π΅Ρ‚Π°Ρ‚Π΅Π»ΡŒΠ½Ρ‹Ρ… Π°ΠΏΠΏΠ°Ρ€Π°Ρ‚ΠΎΠ²');

'R','r': writeln (' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ радиотСхничСский ');

'M','m': writeln (' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ ΠΈΠ½ΠΆΠ΅Π½Π΅Ρ€Π½ΠΎ — мСнСдТСрский'); 'Z','z': writeln (' Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ Π·Π°ΠΎΡ‡Π½ΠΎΠ³ΠΎ обучСния');

else writeln ('Π²Π²Π΅Π΄Π΅Π½Π½Ρ‹ΠΉ ΡˆΠΈΡ„Ρ€ Π½Π΅ ΡΠΎΠΎΡ‚вСтствуСт Π½ΠΈ ΠΎΠ΄Π½ΠΎΠΌΡƒ ',

'ΠΈΠ· Ρ„Π°ΠΊΡƒΠ»ΡŒΡ‚Π΅Ρ‚ΠΎΠ² Π₯АИ'); end; readln; END. 5. Π‘Π΅Π»Π΅ΠΊΡ‚ΠΎΡ€ пСрСчисляСмого Ρ‚ΠΈΠΏΠ°:

Program Prim11; Var season:(winter, spring, summer, autumn); rez: integer;BEGIN season:=spring; Writeln ('Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ ord (season)=', ord (season)); case season of winter: writeln ('winter');

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