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

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ Π½Π° алгоритмичСском языкС БСйсик

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

НСсмотря Π½Π° Ρ‚ΠΎ, Ρ‡Ρ‚ΠΎ язык ΡƒΠΆΠ΅ использовался Π½Π° Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΌΠΈΠ½ΠΈΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π°Ρ…, Π΅Π³ΠΎ настоящСС распространСниС Π½Π°Ρ‡Π°Π»ΠΎΡΡŒ с Π΅Π³ΠΎ появлСния Π½Π° ΠΌΠΈΠΊΡ€ΠΎΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π΅ Altair 8800. МногиС языки программирования Π±Ρ‹Π»ΠΈ слишком большими Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΠΎΠΌΠ΅ΡΡ‚ΠΈΡ‚ΡŒΡΡ Π² Π½Π΅Π±ΠΎΠ»ΡŒΡˆΡƒΡŽ ΠΏΠ°ΠΌΡΡ‚ΡŒ, ΠΊΠΎΡ‚ΠΎΡ€ΡƒΡŽ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΠΈ Ρ‚Π°ΠΊΠΈΡ… машин ΠΌΠΎΠ³Π»ΠΈ сСбС ΠΏΠΎΠ·Π²ΠΎΠ»ΠΈΡ‚ΡŒ. Для машин с Ρ‚Π°ΠΊΠΈΠΌ ΠΌΠ΅Π΄Π»Π΅Π½Π½Ρ‹ΠΌ носитСлСм ΠΊΠ°ΠΊ бумаТная Π»Π΅Π½Ρ‚Π° (ΠΏΠΎΠ·Π΄Π½Π΅Π΅ — аудиокассСта) ΠΈ Π±Π΅Π·… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ Π½Π° алгоритмичСском языкС БСйсик (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

ΠšΠ£Π Π‘ΠžΠ’ΠΠ― Π ΠΠ‘ΠžΠ’Π

ΠΏΠΎ Π΄ΠΈΡΡ†ΠΈΠΏΠ»ΠΈΠ½Π΅ «Π˜Π½Ρ„ΠΎΡ€ΠΌΠ°Ρ‚ΠΈΠΊΠ°»

Π’Π΅ΠΌΠ°: ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ Π½Π° Π°Π»Π³ΠΎΡ€ΠΈΡ‚мичСском языкС БСйсик

1. Π‘Π»ΠΎΠΊ-схСма Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° Ρ€Π΅ΡˆΠ΅Π½ΠΈΠ΅ Π·Π°Π΄Π°Ρ‡ΠΈ

2. ОписаниС Π±Π»ΠΎΠΊ-схСмы Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ

3. РаспСчатка ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ БСйсик

4. РаспСчатка исходных Π΄Π°Π½Π½Ρ‹Ρ…

5. РаспСчатка Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² расчСта Π—Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅ Π›ΠΈΡ‚Π΅Ρ€Π°Ρ‚ΡƒΡ€Π°

Π’ Π½Π°ΡΡ‚оящСС врСмя большоС мСсто Π² Π½Π°ΡˆΠ΅ΠΉ ΠΆΠΈΠ·Π½ΠΈ ΠΎΡ‚Π²Π΅Π΄Π΅Π½ΠΎ Ρ€Π°Π·Π»ΠΈΡ‡Π½Ρ‹ΠΌ устройствам ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½Π½Ρ‹ΠΌ для создания ΠΊΠΎΠΌΡ„ΠΎΡ€Ρ‚Π° Π² Π±Ρ‹Ρ‚Ρƒ, облСгчСния выполнСния Ρ€Π°Π±ΠΎΡ‚Ρ‹ ΠΈ Ρ‚. Π΄. Одним ΠΈΠ· Ρ‚Π°ΠΊΠΈΡ… устройств являСтся ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€.

Π₯отя ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Ρ‹ создавались для числСнных расчСтов, скоро оказалось, Ρ‡Ρ‚ΠΎ ΠΎΠ½ΠΈ ΠΌΠΎΠ³ΡƒΡ‚ ΠΎΠ±Ρ€Π°Π±Π°Ρ‚Ρ‹Π²Π°Ρ‚ΡŒ ΠΈ Π΄Ρ€ΡƒΠ³ΠΈΠ΅ Π²ΠΈΠ΄Ρ‹ ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠΈ. Для ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ Ρ€Π°Π·Π»ΠΈΡ‡Π½ΠΎΠΉ ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠΈ Π½Π° ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π΅ Π½Π°Π΄ΠΎ ΠΈΠΌΠ΅Ρ‚ΡŒ срСдства для прСобразования Π½ΡƒΠΆΠ½ΠΎΠ³ΠΎ Π²ΠΈΠ΄Π° ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠΈ Π² Ρ‡ΠΈΡΠ»ΠΎΠ²ΡƒΡŽ Ρ„ΠΎΡ€ΠΌΡƒ ΠΈ ΠΎΠ±Ρ€Π°Ρ‚Π½ΠΎ. БСйчас с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€ΠΎΠ² Π½Π΅ Ρ‚ΠΎΠ»ΡŒΠΊΠΎ проводятся числовыС расчСты, Π½ΠΎ ΠΈ ΠΏΠΎΠ΄Π³ΠΎΡ‚Π°Π²Π»ΠΈΠ²Π°ΡŽΡ‚ΡΡ ΠΊ ΠΏΠ΅Ρ‡Π°Ρ‚ΠΈ ΠΊΠ½ΠΈΠ³ΠΈ, ΡΠΎΠ·Π΄Π°ΡŽΡ‚ΡΡ рисунки, ΠΊΠΈΠ½ΠΎΡ„ΠΈΠ»ΡŒΠΌΡ‹, ΠΌΡƒΠ·Ρ‹ΠΊΠ°, осущСствляСтся ΡƒΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠ΅ Π·Π°Π²ΠΎΠ΄Π°ΠΌΠΈ ΠΈ ΠΊΠΎΡΠΌΠΈΡ‡Π΅ΡΠΊΠΈΠΌΠΈ кораблями ΠΈ Ρ‚. Π΄. ΠšΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Ρ‹ ΠΏΡ€Π΅Π²Ρ€Π°Ρ‚ΠΈΠ»ΠΈΡΡŒ Π² ΡƒΠ½ΠΈΠ²Π΅Ρ€ΡΠ°Π»ΡŒΠ½Ρ‹Π΅ срСдства ΠΎΠ±Ρ€Π°Π±ΠΎΡ‚ΠΊΠΈ ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠΈ.

Π―Π·Ρ‹ΠΊ Π‘Π•Π™Π‘Π˜Πš, ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½Π½Ρ‹ΠΉ для обучСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΡŽ ΠΈ ΠΏΠΎΠ»ΡƒΡ‡ΠΈΠ²ΡˆΠΈΠΉ ΡˆΠΈΡ€ΠΎΠΊΠΎΠ΅ распространСниС Π² Π²ΠΈΠ΄Π΅ Ρ€Π°Π·Π»ΠΈΡ‡Π½Ρ‹Ρ… Π΄ΠΈΠ°Π»Π΅ΠΊΡ‚ΠΎΠ², ΠΏΡ€Π΅ΠΆΠ΄Π΅ всСго, ΠΊΠ°ΠΊ язык для Π΄ΠΎΠΌΠ°ΡˆΠ½ΠΈΡ… ΠΌΠΈΠΊΡ€ΠΎΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€ΠΎΠ².

БСйсик (BASIC — сокращСниС ΠΎΡ‚ Π°Π½Π³Π». Beginner’s All-purpose Symbolic Instruction Code — ΡƒΠ½ΠΈΠ²Π΅Ρ€ΡΠ°Π»ΡŒΠ½Ρ‹ΠΉ ΠΊΠΎΠ΄ символичСских инструкций для Π½Π°Ρ‡ΠΈΠ½Π°ΡŽΡ‰ΠΈΡ…; Π°Π½Π³Π». basic — основной, Π±Π°Π·ΠΎΠ²Ρ‹ΠΉ) — сСмСйство высокоуровнСвых языков программирования. Π‘Ρ‹Π» Ρ€Π°Π·Ρ€Π°Π±ΠΎΡ‚Π°Π½ Π² 1963 профСссорами Дартмутского ΠΊΠΎΠ»Π»Π΅Π΄ΠΆΠ° Вомасом ΠšΡƒΡ€Ρ‚Ρ†ΠΎΠΌ (Thomas E. Kurtz, 1928;) ΠΈ Π”ΠΆΠΎΠ½ΠΎΠΌ КСмСни (John G. Kemeny, 1926;1993).

БСйсик Π±Ρ‹Π» спроСктирован Ρ‚Π°ΠΊ, Ρ‡Ρ‚ΠΎΠ±Ρ‹ студСнты ΠΌΠΎΠ³Π»ΠΈ ΠΏΠΈΡΠ°Ρ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹, ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡ Ρ‚Π΅Ρ€ΠΌΠΈΠ½Π°Π»Ρ‹ с Ρ€Π°Π·Π΄Π΅Π»Π΅Π½ΠΈΠ΅ΠΌ Π²Ρ€Π΅ΠΌΠ΅Π½ΠΈ. Он ΡΠΎΠ·Π΄Π°Π²Π°Π»ΡΡ ΠΊΠ°ΠΊ Ρ€Π΅ΡˆΠ΅Π½ΠΈΠ΅ для ΠΏΡ€ΠΎΠ±Π»Π΅ΠΌ, связанных со ΡΠ»ΠΎΠΆΠ½ΠΎΡΡ‚ΡŒΡŽ Π±ΠΎΠ»Π΅Π΅ старых языков. Он ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π°Π»ΡΡ для Π±ΠΎΠ»Π΅Π΅ «ΠΏΡ€ΠΎΡΡ‚Ρ‹Ρ…» ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Π΅ΠΉ, Π½Π΅ ΡΡ‚ΠΎΠ»ΡŒΠΊΠΎ заинтСрСсованных Π² ΡΠΊΠΎΡ€ΠΎΡΡ‚ΠΈ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ, сколько просто Π² Π²ΠΎΠ·ΠΌΠΎΠΆΠ½ΠΎΡΡ‚ΠΈ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚ΡŒ ΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€ для Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ своих Π·Π°Π΄Π°Ρ‡.

НСсмотря Π½Π° Ρ‚ΠΎ, Ρ‡Ρ‚ΠΎ язык ΡƒΠΆΠ΅ использовался Π½Π° Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΌΠΈΠ½ΠΈΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π°Ρ…, Π΅Π³ΠΎ настоящСС распространСниС Π½Π°Ρ‡Π°Π»ΠΎΡΡŒ с Π΅Π³ΠΎ появлСния Π½Π° ΠΌΠΈΠΊΡ€ΠΎΠΊΠΎΠΌΠΏΡŒΡŽΡ‚Π΅Ρ€Π΅ Altair 8800. МногиС языки программирования Π±Ρ‹Π»ΠΈ слишком большими Ρ‡Ρ‚ΠΎΠ±Ρ‹ ΠΏΠΎΠΌΠ΅ΡΡ‚ΠΈΡ‚ΡŒΡΡ Π² Π½Π΅Π±ΠΎΠ»ΡŒΡˆΡƒΡŽ ΠΏΠ°ΠΌΡΡ‚ΡŒ, ΠΊΠΎΡ‚ΠΎΡ€ΡƒΡŽ ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΠΈ Ρ‚Π°ΠΊΠΈΡ… машин ΠΌΠΎΠ³Π»ΠΈ сСбС ΠΏΠΎΠ·Π²ΠΎΠ»ΠΈΡ‚ΡŒ. Для машин с Ρ‚Π°ΠΊΠΈΠΌ ΠΌΠ΅Π΄Π»Π΅Π½Π½Ρ‹ΠΌ носитСлСм ΠΊΠ°ΠΊ бумаТная Π»Π΅Π½Ρ‚Π° (ΠΏΠΎΠ·Π΄Π½Π΅Π΅ — аудиокассСта) ΠΈ Π±Π΅Π· подходящСго тСкстового Ρ€Π΅Π΄Π°ΠΊΡ‚ΠΎΡ€Π° Ρ‚Π°ΠΊΠΎΠΉ нСбольшой язык ΠΊΠ°ΠΊ БСйсик Π±Ρ‹Π» ΠΎΡ‚Π»ΠΈΡ‡Π½ΠΎΠΉ Π½Π°Ρ…ΠΎΠ΄ΠΊΠΎΠΉ.

1. Π‘Π»ΠΎΠΊ-схСма Π°Π»Π³ΠΎΡ€ΠΈΡ‚ΠΌΠ° Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ

А

НЕВ

ДА

НЕВ

2. ОписаниС Π±Π»ΠΎΠΊ-схСмы

Π‘Π»ΠΎΠΊ 1 — ΠŸΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½ для Π½Π°Ρ‡Π°Π»Π° ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹.

Π‘Π»ΠΎΠΊ 2 — Для задания массивов А, Π’.

Π‘Π»ΠΎΠΊ 3 — Для записи условия S=0, Π₯=0.

Π‘Π»ΠΎΠΊ 4 — Начало Ρ†ΠΈΠΊΠ»Π°, Π³Π΄Π΅ I ΠΌΠ΅Π½ΡΠ΅Ρ‚ свои значСния ΠΎΡ‚ 1 Π΄ΠΎ 9 с ΡˆΠ°Π³ΠΎΠΌ 1. ΠŸΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½ для Π²Π²ΠΎΠ΄Π° ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… Π²Π΅ΠΊΡ‚ΠΎΡ€Π° А.

Π‘Π»ΠΎΠΊ 5 — Π’Π²ΠΎΠ΄ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ Π²Π΅ΠΊΡ‚ΠΎΡ€Π°, А Ρ ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹.

Π‘Π»ΠΎΠΊ 6 — Π’Ρ‹Π²ΠΎΠ΄ Π²Π²Π΅Π΄Π΅Π½Π½Ρ‹Ρ… Π΄Π°Π½Π½Ρ‹Ρ… Π½Π° ΡΠΊΡ€Π°Π½.

Π‘Π»ΠΎΠΊ 7 — ΠŸΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½ для присвоСния элСмСнту Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’, Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ элСмСнтов Π²Π΅ΠΊΡ‚ΠΎΡ€Π° А.

Π‘Π»ΠΎΠΊ 8- Π’Π²ΠΎΠ΄ значСния R Ρ ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹.

Π‘Π»ΠΎΠΊ 9 — Π’Ρ‹Π²ΠΎΠ΄ значСния R Π½Π° ΠΏΠ΅Ρ‡Π°Ρ‚ΡŒ.

Π‘Π»ΠΎΠΊ 10 — Начало Ρ†ΠΈΠΊΠ»Π°, для Π²Ρ‹Π²ΠΎΠ΄Π° исходных Π΄Π°Π½Π½Ρ‹Ρ… Π½Π° ΠΏΠ΅Ρ‡Π°Ρ‚ΡŒ.

Π‘Π»ΠΎΠΊ 11 — РаспСчатка со Π·Π½Π°Ρ‡Π΅Π½ΠΈΡΠΌΠΈ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ А.

Π‘Π»ΠΎΠΊ 12 — Для присвоСния Π²Π΅ΠΊΡ‚ΠΎΡ€Ρƒ Π’ (10) значСния R.

Π‘Π»ΠΎΠΊ 13- Начало Ρ†ΠΈΠΊΠ»Π°, Π³Π΄Π΅ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ I ΠΌΠ΅Π½ΡΠ΅Ρ‚ значСния ΠΎΡ‚ 2 Π΄ΠΎ 10. Π¦ΠΈΠΊΠ» ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½ для расстановки Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ элСмСнтов Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’ Π² ΠΏΠΎΡ€ΡΠ΄ΠΊΠ΅ возрастания.

Π‘Π»ΠΎΠΊ 14 — Начало Ρ†ΠΈΠΊΠ»Π°, Π³Π΄Π΅ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ J ΠΌΠ΅Π½ΡΠ΅Ρ‚ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΎΡ‚ 10 Π΄ΠΎ 2 с ΡˆΠ°Π³ΠΎΠΌ -1.

Π‘Π»ΠΎΠΊ 15 — Π±Π»ΠΎΠΊ ΠΏΠ΅Ρ€Π΅Π΄Π°Ρ‡ΠΈ ΡƒΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΉ ΠΏΠΎ ΡƒΡΠ»ΠΎΠ²ΠΈΡŽ. Если условиС Π²Π΅Ρ€Π½ΠΎ Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся 16 Π±Π»ΠΎΠΊ, Ссли Π½Π΅Ρ‚ Ρ‚ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€ΠΎΠ΄ΠΎΠ»ΠΆΠ°Π΅Ρ‚ Ρ€Π°Π±ΠΎΡ‚Ρƒ игнорируя записанноС условиС Π² 16 Π±Π»ΠΎΠΊΠ΅.

Π‘Π»ΠΎΠΊ 16 — Π—Π°Π΄Π°Π½ΠΈΠ΅ условия. ПослС выполнСния ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ³ΠΎ, происходит ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄ ΠΊ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌΡƒ Π·Π½Π°Ρ‡Π΅Π½ΠΈΡŽ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Π° J ΠΈΠ· Ρ†ΠΈΠΊΠ»Π°. ПослС Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΡ Ρ†ΠΈΠΊΠ»Π° J ΠΏΡ€ΠΎΠΈΡΡ…ΠΎΠ΄ΠΈΡ‚ ΠΏΠ΅Ρ€Π΅Ρ…ΠΎΠ΄ ΠΊ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌΡƒ Π·Π½Π°Ρ‡Π΅Π½ΠΈΡŽ I.

Π‘Π»ΠΎΠΊΠΈ 13, 14, 15 ΠΈ 16 ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½Ρ‹ для распрСдСлСния Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’ Π² ΠΏΠΎΡ€ΡΠ΄ΠΊΠ΅ возрастания (ΠΌΠ΅Ρ‚ΠΎΠ΄ Π²ΡΠΏΠ»Ρ‹Π²Π°ΡŽΡ‰ΠΈΡ… ΠΏΡƒΠ·Ρ‹Ρ€ΡŒΠΊΠΎΠ²).

Π‘Π»ΠΎΠΊ 17 — Начало Ρ†ΠΈΠΊΠ»Π° I, с ΠΏΠΎΠΌΠΎΡ‰ΡŒΡŽ ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ³ΠΎ Π²Ρ‹Π²Π΅Π΄Π΅ΠΌ всС значСния Π’ Π½Π° ΠΏΠ΅Ρ‡Π°Ρ‚ΡŒ.

Π‘Π»ΠΎΠΊ 18 — Π’Ρ‹Π²ΠΎΠ΄ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’ ΠΏΠΎ Π²ΠΎΠ·Ρ€Π°ΡΡ‚Π°Π½ΠΈΡŽ Π½Π° ΠΏΠ΅Ρ‡Π°Ρ‚ΡŒ.

Π‘Π»ΠΎΠΊ 19 — Π‘Π»ΠΎΠΊ ΠΏΠ΅Ρ€Π΅Π΄Π°Ρ‡ΠΈ ΡƒΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΉ ΠΏΠΎ ΡƒΡΠ»ΠΎΠ²ΠΈΡŽ для нахоТдСния суммы Π»ΠΎΠ³Π°Ρ€ΠΈΡ„ΠΌΠΎΠ² ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚ΠΎΠ² элСмСнтов Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’.

Π‘Π»ΠΎΠΊ 20 — ВычислСниС S (суммы), послС происходит Π²ΠΎΠ·Π²Ρ€Π°Ρ‚ ΠΊ Π½Π°Ρ‡Π°Π»Ρƒ Ρ†ΠΈΠΊΠ»Π°, Π³Π΄Π΅ мСняСтся Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€Π° I ΠΈ Ρ‚Π°ΠΊ Π΄ΠΎ ΠΊΠΎΠ½Ρ†Π° Π·Π°Π²Π΅Ρ€ΡˆΠ΅Π½ΠΈΡ Ρ†ΠΈΠΊΠ»Π°.

Π‘Π»ΠΎΠΊ 21 — Π’Ρ‹Π²ΠΎΠ΄ Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ S Π½Π° ΠΏΠ΅Ρ‡Π°Ρ‚ΡŒ (распСчатка).

Π‘Π»ΠΎΠΊ 22 — ΠšΠΎΠ½Π΅Ρ† ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹.

3. РаспСчатка ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

10 REM DZIK

20 DIM A (9), B (10)

30 S=O:X=O

40 FOR I=1 TO 9

50 PRINT «A (» ;I;")" ,

60 INPUT A (I)

70 B (I)=A (I)

80 NEXT I

90 INPUT «R=»; R

100 LPRINT USING «R=##.##»; R

110 FOR I=1 TO 9

120 LPRINT USING «A (I)=##.##»; A (I)

130 NEXT I

140 B (10)=R

150 FOR I=2 TO 10

160 FOR J=10 TO I STEP -1

170 IF B (J-1)>B (J) THEN X=B (J): B (J)=B (J-1): B (J-1)=X

180 NEXT J

160 NEXT I

200 FOR I=1 TO 10

210 LPRINT USING «B (I)=##.##»; B (I)

220 IF I MOD 2=0 THEN S=S+LOG (B (I)^2)

230 NEXT I

240 LPRINT USING «S=##.##»; S

250 END_

4. РаспСчатка исходных Π΄Π°Π½Π½Ρ‹Ρ…

R= 2.30

A (I)= 9.60

A (I)= 7.40

A (I)= 4.10

A (I)= 4.00

A (I)= 3.80

A (I)= 2.50

A (I)= 2.40

A (I)= 2.20

A (I)= 1.70

5. РаспСчатка Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² расчСта

B (I)= 1.70

B (I)= 2.20

B (I)= 2.30

B (I)= 2.40

B (I)= 2.50

B (I)= 3.80

B (I)= 4.00

B (I)= 4.10

B (I)= 7.40

B (I)= 9.60

S=24.68

Π—Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅

Π’ ΠΊΡƒΡ€ΡΠΎΠ²ΠΎΠΉ Ρ€Π°Π±ΠΎΡ‚Π΅ ΠΈΠ· Π΄Π°Π½Π½Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ Π²Π΅ΠΊΡ‚ΠΎΡ€Π° А=(9,6 7,4 4,1 4,0 3,8 2,5 2,4 2,2 1,7), Π²Π²Π΅Π΄Π΅Π½Π½Ρ‹Ρ… с ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹ ΠΈ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ R=2,3, рассчитаны значСния Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’=(9,6 7,4 4,1 4,0 3,8 2,5 2,4 2,2 1,7 2,3), ΠΌΠ΅Ρ‚ΠΎΠ΄ΠΎΠΌ «Π’ΡΠΏΠ»Ρ‹Π²Π°ΡŽΡ‰ΠΈΡ… ΠΏΡƒΠ·Ρ‹Ρ€ΡŒΠΊΠΎΠ²» ΠΏΠΎΠ»ΡƒΡ‡Π΅Π½Π½Ρ‹Π΅ значСния Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’ Π±Ρ‹Π»ΠΈ располоТСны Π² ΠΏΠΎΡ€ΡΠ΄ΠΊΠ΅ возрастания Π’=(1,7 2,2 2,3 2,4 2,5 3,8 4,0 4,1 7,4 9,6). ВычислСна сумма Π»ΠΎΠ³Π°Ρ€ΠΈΡ„ΠΌΠΎΠ² ΠΊΠ²Π°Π΄Ρ€Π°Ρ‚ΠΎΠ² Ρ‡Π΅Ρ‚Π½Ρ‹Ρ… элСмСнтов Π²Π΅ΠΊΡ‚ΠΎΡ€Π° Π’. (S=24,68).

Для составлСниС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π² ΠΊΡƒΡ€ΡΠΎΠ²ΠΎΠΉ Ρ€Π°Π±ΠΎΡ‚Π΅ использовались ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Ρ‹:

REM — слуТит для записи ΠΊΠΎΠΌΠΌΠ΅Π½Ρ‚Π°Ρ€ΠΈΠ΅Π² ΠΈ Π½Π΅ Π²Π»ΠΈΡΡŽΡ‚ Π½Π° Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹.

DIM- ΠžΠ±ΡŠΡΠ²Π»ΡΠ΅Ρ‚ массивы с ΡƒΠΊΠ°Π·Π°Π½ΠΈΠ΅ΠΌ Ρ€Π°Π·ΠΌΠ΅Ρ€ΠΎΠ².

INPUT - подсказываСт ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŽ, Ρ‡Ρ‚ΠΎ Π½ΡƒΠΆΠ½ΠΎ ввСсти Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΎΠ΄Π½ΠΎΠΉ ΠΈΠ»ΠΈ Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ…. ΠžΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ INPUT ΠΆΠ΄Π΅Ρ‚, ΠΏΠΎΠΊΠ° ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»ΡŒ Π½Π΅ Π²Π²Π΅Π΄Π΅Ρ‚ Π΄Π°Π½Π½Ρ‹Π΅ с ΠΊΠ»Π°Π²ΠΈΠ°Ρ‚ΡƒΡ€Ρ‹, ΠΈ Π·Π°Ρ‚Π΅ΠΌ присваиваСт значСния Π·Π°Π΄Π°Π½Π½Ρ‹ΠΌ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹ΠΌ.

PRINT — слуТит для Π²Ρ‹Π²ΠΎΠ΄Π° Π΄Π°Π½Π½Ρ‹Ρ… Π½Π° ΡΠΊΡ€Π°Π½.

LPRINT USING - Π²Ρ‹Π²ΠΎΠ΄ Π΄Π°Π½Π½Ρ‹Ρ… Π½Π° ΠΏΡ€ΠΈΠ½Ρ‚Π΅Ρ€.

FOR-NEXT — для ΠΎΡ€Π³Π°Π½ΠΈΠ·Π°Ρ†ΠΈΠΈ Ρ†ΠΈΠΊΠ»Π°. Π’Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ΠΎΠ² ΠΌΠ΅ΠΆΠ΄Ρƒ FOR ΠΈ NEXT повторяСтся ΠΈ Ρ ΠΊΠ°ΠΆΠ΄Ρ‹ΠΌ ΠΏΡ€ΠΎΡ…ΠΎΠΆΠ΄Π΅Π½ΠΈΠ΅ΠΌ Ρ‡Π΅Ρ€Π΅Π· Ρ†ΠΈΠΊΠ» Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½ΠΎΠΉ увСличиваСтся Π½Π° Π²Π΅Π»ΠΈΡ‡ΠΈΠ½Ρƒ шага. Если шаг опускаСтся, пошаговоС ΠΏΡ€ΠΈΡ€Π°Ρ‰Π΅Π½ΠΈΠ΅ ΠΏΠΎ ΡƒΠΌΠΎΠ»Ρ‡Π°Π½ΠΈΡŽ становится Ρ€Π°Π²Π½Ρ‹ΠΌ 1. Π¦ΠΈΠΊΠ» Π·Π°Π²Π΅Ρ€ΡˆΠ°Π΅Ρ‚ΡΡ, ΠΊΠΎΠ³Π΄Π° пСрСмСнная счСтчика Π±ΡƒΠ΄Π΅Ρ‚ большС ΠΈΠ»ΠΈ Ρ€Π°Π²Π½Π° Ρ‚ΠΎΠΉ, Ρ‡Ρ‚ΠΎ ΡƒΠΊΠ°Π·Π°Π½Π° Π² ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€Π΅.

IF-THEN — провСряСт условия ΠΈ ΠΌΠ΅Π½ΡΠ΅Ρ‚ Ρ…ΠΎΠ΄ выполнСния ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π² ΡΠΎΠΎΡ‚вСтствии с Π·Π°Π΄Π°Π½Π½Ρ‹ΠΌΠΈ условиям. Если Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅Π΅ Π·Π° IF Π²Π΅Ρ€Π½ΠΎ, Ρ‚. Π΅. ΡΠΎΠ±Π»ΡŽΠ΄Π΅Π½Ρ‹ Π·Π°Π΄Π°Π½Π½Ρ‹Π΅ условия, Ρ‚ΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΡΠ΅Ρ‚ся ΠΎΠΏΠ΅Ρ€Π°Ρ‚ΠΎΡ€ (Ρ‹), ΡΠ»Π΅Π΄ΡƒΡŽΡ‰ΠΈΠΉ Π·Π° THEN. Если Π²Ρ‹Ρ€Π°ΠΆΠ΅Π½ΠΈΠ΅ Π½Π΅ Π²Π΅Ρ€Π½ΠΎ, Ρ‚ΠΎ Π²ΡΠ΅ Ρ‡Ρ‚ΠΎ стоит Π·Π° THEN опускаСтся, ΠΈ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° продолТаСтся Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ΠΌ ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΉ строки ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹.

END — Π—Π°Π²Π΅Ρ€ΡˆΠ°Π΅Ρ‚ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½ΠΈΠ΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹.

1. «ΠœΠ΅Ρ‚одичСскиС указания ΠΈ ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Ρ‹Π΅ задания» ΠΏΠΎ Π΄ΠΈΡΡ†ΠΈΠΏΠ»ΠΈΠ½Π΅ «Π˜Π½Ρ„ΠΎΡ€ΠΌΠ°Ρ‚ΠΈΠΊΠ°», — Мн. 2001.

2. Π’. Π­. Π€ΠΈΠ³ΡƒΡ€Π½ΠΎΠ², «IBM PC для ΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Ρ‚Π΅Π»Ρ», ΠΈΠ·Π΄Π°Π½ΠΈΠ΅ 7, Москва, ИНЀРА-М, 1997.

3. «ΠžΠ‘ΠΠžΠ’Π« ΠŸΠ Π˜ΠšΠ›ΠΠ”ΠΠžΠ™ ИНЀОРМАВИКИ» Π Π°Π·Π΄Π΅Π»: ОписаниС языка Π’ΡƒΡ€Π±ΠΎ-БСйсик. Π‘ΠΏΡ€Π°Π²ΠΎΡ‡Π½ΠΎΠ΅ пособиС для студСнтов всСх ΡΠΏΠ΅Ρ†ΠΈΠ°Π»ΡŒΠ½ΠΎΡΡ‚Π΅ΠΉ, — Москва, 1994.

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