Π”ΠΈΠΏΠ»ΠΎΠΌΡ‹, курсовыС, Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚Ρ‹, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Ρ‹Π΅...
Брочная ΠΏΠΎΠΌΠΎΡ‰ΡŒ Π² ΡƒΡ‡Ρ‘Π±Π΅

РСшСниС ΠΎΠΏΡ‚ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΎΠ½Π½Ρ‹Ρ… Π·Π°Π΄Π°Ρ‡

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

Π‘ΡƒΡ‚ΡŒ ΠΌΠ΅Ρ‚ΠΎΠ΄Π° Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска состоит Π² ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ. Как ΠΈ ΠΏΡ€Π΅ΠΆΠ΄Π΅, Π² Π½Π°Ρ‡Π°Π»ΡŒΠ½ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ опрСдСляСтся Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚ ΠΌΠΈΠ½ΠΈΠΌΠΈΠ·ΠΈΡ€ΡƒΠ΅ΠΌΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ. Однако Ρ‚Π΅ΠΏΠ΅Ρ€ΡŒ Π² Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΈ Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π° дСлаСтся Π½ΠΈ ΠΎΠ΄ΠΈΠ½ шаг, Π° Π΄Π²ΠΈΠΆΡƒΡ‚ся Π² Π΄Π°Π½Π½ΠΎΠΌ Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΈ Π΄ΠΎ Ρ‚Π΅Ρ… ΠΏΠΎΡ€, ΠΏΠΎΠΊΠ° цСлСвая функция ΡƒΠ±Ρ‹Π²Π°Π΅Ρ‚, достигаСт Π² Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ°. Π’ ΡΡ‚ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ ΠΎΠΏΡΡ‚ΡŒ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΡŽΡ‚ Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚ ΠΈ ΠΈΡ‰ΡƒΡ‚ Π½ΠΎΠ²ΡƒΡŽ Ρ‚ΠΎΡ‡ΠΊΡƒ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° Ρ†Π΅Π»Π΅Π²ΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ… Π§ΠΈΡ‚Π°Ρ‚ΡŒ Π΅Ρ‰Ρ‘ >

РСшСниС ΠΎΠΏΡ‚ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΎΠ½Π½Ρ‹Ρ… Π·Π°Π΄Π°Ρ‡ (Ρ€Π΅Ρ„Π΅Ρ€Π°Ρ‚, курсовая, Π΄ΠΈΠΏΠ»ΠΎΠΌ, ΠΊΠΎΠ½Ρ‚Ρ€ΠΎΠ»ΡŒΠ½Π°Ρ)

Π’Π΅Ρ€ΠΌΠΈΠ½ «ΠΎΠΏΡ‚имизация» ΠΈΠΌΠ΅Π΅Ρ‚ ΠΎΡ‡Π΅Π½ΡŒ ΡˆΠΈΡ€ΠΎΠΊΠΎΠ΅ ΡƒΠΏΠΎΡ‚Ρ€Π΅Π±Π»Π΅Π½ΠΈΠ΅, Π° ΠΏΠΎΡ‚ΠΎΠΌΡƒ ΠΌΠΎΠΆΠ΅Ρ‚ Π·Π°Π²ΠΈΡΠ΅Ρ‚ΡŒ ΠΎΡ‚ ΠΊΠΎΠ½Ρ‚Скста. ΠžΠΏΡ‚ΠΈΠΌΡƒΠΌ (ΠΎΡ‚ Π»Π°Ρ‚. optimum — Π½Π°ΠΈΠ»ΡƒΡ‡ΡˆΠ΅Π΅) — ΡΠΎΠ²ΠΎΠΊΡƒΠΏΠ½ΠΎΡΡ‚ΡŒ Π½Π°ΠΈΠ±ΠΎΠ»Π΅Π΅ Π±Π»Π°Π³ΠΎΠΏΡ€ΠΈΡΡ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΡ… условий; Π½Π°ΠΈΠ»ΡƒΡ‡ΡˆΠΈΠΉ Π²Π°Ρ€ΠΈΠ°Π½Ρ‚ Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ Π·Π°Π΄Π°Ρ‡ΠΈ ΠΈΠ»ΠΈ ΠΏΡƒΡ‚ΡŒ достиТСния Ρ†Π΅Π»ΠΈ ΠΏΡ€ΠΈ Π΄Π°Π½Π½Ρ‹Ρ… условиях ΠΈ Ρ€Π΅ΡΡƒΡ€ΡΠ°Ρ….

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

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

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

МодСль — это Ρ‚Π°ΠΊΠΎΠΉ ΠΌΠ°Ρ‚Π΅Ρ€ΠΈΠ°Π»ΡŒΠ½Ρ‹ΠΉ ΠΈΠ»ΠΈ мыслСнно прСдставляСмый ΠΎΠ±ΡŠΠ΅ΠΊΡ‚, ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ Π² ΠΏΡ€ΠΎΡ†Π΅ΡΡΠ΅ исслСдования Π·Π°ΠΌΠ΅Ρ‰Π°Π΅Ρ‚ ΠΎΠ±ΡŠΠ΅ΠΊΡ‚-ΠΎΡ€ΠΈΠ³ΠΈΠ½Π°Π» Ρ‚Π°ΠΊ, Ρ‡Ρ‚ΠΎ Π΅Π³ΠΎ нСпосрСдствСнноС ΠΈΠ·ΡƒΡ‡Π΅Π½ΠΈΠ΅ Π΄Π°Π΅Ρ‚ Π½ΠΎΠ²Ρ‹Π΅ знания ΠΎΠ± ΠΎΠ±ΡŠΠ΅ΠΊΡ‚Π΅-ΠΎΡ€ΠΈΠ³ΠΈΠ½Π°Π»Π΅.

1. ЦСль, Π·Π°Π΄Π°Ρ‡ΠΈ ΠΈ ΡΡ‚Π°ΠΏΡ‹ выполнСния курсовой Ρ€Π°Π±ΠΎΡ‚Ρ‹

ЦСль курсовой Ρ€Π°Π±ΠΎΡ‚Ρ‹ — ΠΎΠ·Π½Π°ΠΊΠΎΠΌΠ»Π΅Π½ΠΈΠ΅ с ΠΌΠ΅Ρ‚ΠΎΠ΄Π°ΠΌΠΈ Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ ΠΎΠΏΡ‚ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΎΠ½Π½Ρ‹Ρ… Π·Π°Π΄Π°Ρ‡, Π° Ρ‚Π°ΠΊ ΠΆΠ΅ ΠΏΡ€ΠΈΠΎΠ±Ρ€Π΅Ρ‚Π΅Π½ΠΈΠ΅ Π½Π°Π²Ρ‹ΠΊΠΎΠ² ΠΈΠ½Ρ‚Π΅Ρ€ΠΏΡ€Π΅Ρ‚Π°Ρ†ΠΈΠΈ ΠΈ ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½ΠΈΡ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² матСматичСских вычислСний для Ρ€Π΅ΡˆΠ΅Π½ΠΈΡ ΠΊΠΎΠ½ΠΊΡ€Π΅Ρ‚Π½Ρ‹Ρ… практичСских Π·Π°Π΄Π°Ρ‡.

Π—Π°Π΄Π°Ρ‡ΠΈ курсовой Ρ€Π°Π±ΠΎΡ‚Ρ‹:

1. Знакомство с ΠΌΠ΅Ρ‚ΠΎΠ΄Π°ΠΌΠΈ ΠΎΠΏΡ‚ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΈ ΠΈ Π²Ρ‹Ρ‡ΠΈΡΠ»ΠΈΡ‚Π΅Π»ΡŒΠ½ΠΎΠΉ Π³Π΅ΠΎΠΌΠ΅Ρ‚Ρ€ΠΈΠΈ;

2. ОвладСниС Π½Π°Π²Ρ‹ΠΊΠ°ΠΌΠΈ построСния ΠΈ Π°Π½Π°Π»ΠΈΠ·Π° алгоритмичСской ΠΌΠΎΠ΄Π΅Π»ΠΈ ΠΌΠ΅Ρ‚ΠΎΠ΄Π°;

3. Π—Π°ΠΊΡ€Π΅ΠΏΠ»Π΅Π½ΠΈΠ΅ Π½Π°Π²Ρ‹ΠΊΠΎΠ² программирования.

2. Основная Ρ‡Π°ΡΡ‚ΡŒ

2.1 ΠŸΠΎΡΡ‚Π°Π½ΠΎΠ²ΠΊΠ° Π·Π°Π΄Π°Ρ‡ΠΈ Π·Π°Π΄Π°Π½ΠΈΠ΅ 1

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

ΠžΡ‚Ρ‹ΡΠΊΠ°Ρ‚ΡŒ наимСньшСС Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Ρ†Π΅Π»Π΅Π²ΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ f (x) Π½Π° ΠΈΠ½Ρ‚Π΅Ρ€Π²Π°Π»Π΅ [a, b], ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΡƒΡ ΠΌΠ΅Ρ‚ΠΎΠ΄, ΡΠΎΠΎΡ‚Π²Π΅Ρ‚ΡΡ‚Π²ΡƒΡŽΡ‰ΠΈΠΉ Π²Π°Ρ€ΠΈΠ°Π½Ρ‚Ρƒ студСнта.

1., [7;11], ?=0,01

2.1.1 ΠœΠ°Ρ‚Π΅ΠΌΠ°Ρ‚ΠΈΡ‡Π΅ΡΠΊΠ°Ρ модСль Π·Π°Π΄Π°Ρ‡ΠΈ

Алгоритм ΠΌΠ΅Ρ‚ΠΎΠ΄Π° Π»ΠΎΠΌΠ°Π½Π½Ρ‹Ρ…

1. Π’Ρ‹Π±ΠΈΡ€Π°Π΅ΠΌ ΠΏΡ€ΠΎΠΈΠ·Π²ΠΎΠ»ΡŒΠ½ΠΎ Ρ‚ΠΎΡ‡ΠΊΡƒ ΠΈ ΡΡ‚Ρ€ΠΎΠΈΠΌ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΡŽ ;

2. Π‘Π»Π΅Π΄ΡƒΡŽΡ‰Π°Ρ Ρ‚ΠΎΡ‡ΠΊΠ° выбираСтся ΠΈΠ· ΡƒΡΠ»ΠΎΠ²ΠΈΡ (ΠΎΡ‡Π΅Π²ΠΈΠ΄Π½ΠΎ, Ρ‡Ρ‚ΠΎ, ΠΈΠ»ΠΈ);

3. Бтроится функция ;

4. ΠžΡ‡Π΅Ρ€Π΅Π΄Π½Π°Ρ Ρ‚ΠΎΡ‡ΠΊΠ° находится ΠΊΠ°ΠΊ ;

5. Рассмотрим шаг, Ρ‚. — ΠΈΠ·Π²Π΅ΡΡ‚Π½Ρ‹, Ρ‚. Π΅., Π° ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΠ΅ΠΌ ΠΈΠ· ΡƒΡΠ»ΠΎΠ²ΠΈΡ ΠΈ ΡΡ‚Ρ€ΠΎΠΈΠΌ ;

ΠŸΡ€ΠΎΡ†Π΅ΡΡ останавливаСтся ΠΏΠΎ Π΄ΠΎΡΡ‚ΠΈΠΆΠ΅Π½ΠΈΠΈ точности: (Ρ‚ΠΈΠΏ 1) ΠΈΠ»ΠΈ

БлоксхСма

2.1.2 ОписаниС ΠΌΠ΅Ρ‚ΠΎΠ΄Π° Π°Π½Π°Π»ΠΈΠ·Π° матСматичСской ΠΌΠΎΠ΄Π΅Π»ΠΈ

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° написана Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ программирования VBA Π² ΡΡ€Π΅Π΄Π΅ Microsoft Office Excel.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΈΠΌΠ΅Π΅Ρ‚ понятный ΠΈΠ½Ρ‚ΡƒΠΈΡ‚ΠΈΠ²Π½Ρ‹ΠΉ графичСский интСрфСйс (рис. 1.1).

Рисунок 1.1 Π“Π»Π°Π²Π½ΠΎΠ΅ ΠΎΠΊΠ½ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

ПослС запуска Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ввСсти Ρ‚Ρ€Π΅Π±ΡƒΠ΅ΠΌΡƒΡŽ Ρ‚ΠΎΡ‡Π½ΠΎΡΡ‚ΡŒ вычислСний ΠΈ Π³Ρ€Π°Π½ΠΈΡ†Ρ‹ ΠΎΡ‚Ρ€Π΅Π·ΠΊΠ° (рис. 1.2).

Рисунок 1.2 Π’Π²ΠΎΠ΄ Π²Ρ…ΠΎΠ΄Π½Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ

Π—Π°Ρ‚Π΅ΠΌ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° рассчитываСт Ρ‚ΠΎΡ‡ΠΊΠΈ приблиТСния ΠΈ Π½Π°Ρ…ΠΎΠ΄ΠΈΡ‚ для Π΄Π°Π½Π½Ρ‹Ρ… ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½ΠΈΠΉ Ρ‚ΠΎΡ‡ΠΊΡƒ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° (рис. 1.3).

Рисунок 1.3 Π’Ρ‹Π²ΠΎΠ΄ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² расчСта

Π’Π°Π±Π»ΠΈΡ†Π° расчСтов ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π° Π² Ρ‚Π°Π±Π»ΠΈΡ†Π΅ 1.1.

Π’Π°Π±Π»ΠΈΡ†Π° 1.1 РасчСт поиска ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° ΠΏΠΎ ΠΌΠ΅Ρ‚ΠΎΠ΄Ρƒ Π»ΠΎΠΌΠ°Π½Ρ‹Ρ…

8,920 247

9,902 179

— 0,011

— 0,906

9,359 152

10,20 743

— 0,1 139

— 0,681

9,660 416

10,42 042

— 0,1 042

— 0,501

9,895 489

10,57 502

— 0,0091

— 0,365

10,8 922

10,68 873

— 0,773

— 0,264

10,25 261

10,77 255

— 0,644

— 0,191

10,39 123

10,83 424

— 0,526

— 0,137

10,50 841

10,87 947

— 0,424

— 0,98

10,60 659

10,91 254

— 0,337

— 0,0007

10,68 791

10,93 663

— 0,265

— 0,49

10,75 444

10,95 414

— 0,206

— 0,35

10,80 823

10,96 684

— 0,159

— 0,24

10,85 122

10,97 604

— 0,122

— 0,16

10,88 524

10,9827

— 0,93

— 0,11

10,91 193

10,98 751

— 0,0007

— 6,7E-05

10,93 271

10,99 098

— 0,53

— 3,8E-05

10,94 879

10,99 349

— 0,39

— 1,7E-05

10,96 115

10,99 531

— 0,29

— 2,2E-06

10,97 061

10,99 661

— 0,21

8,6E-06

10,97 783

10,99 756

— 0,15

1,64E-05

10,98 331

10,99 824

— 0,0001

2,2E-05

10,98 746

10,99 873

— 6,7E-05

2,61E-05

10,99 059

10,99 908

— 4,1E-05

2,9E-05

2.1.3 РСшСниС Π·Π°Π΄Π°Ρ‡ΠΈ

Листинг ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

матСматичСский ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° интСрфСйс

Private Sub CommandButton1_Click ()

Dim a, b, e, L, x1, x2, fx1, fx2

a = Val (TextBox1.Value)

b = Val (TextBox2.Value)

e = Val (TextBox3.Value)

L = Abs ((a * Sin (a) + 2 * Cos (a)) / (a * a * a))

For i = a To b Step 0.01

If Abs ((i * Sin (i) + 2 * Cos (i)) / (i * i * i)) > L Then

L = Abs ((i * Sin (i) + 2 * Cos (i)) / (i * i * i))

End If

Next i

Cells (5, 11) = L

x0 = (a + b) / 2 + (Cos (a) / (a * a) — Cos (b) / (b * b)) / (2 * L)

Cells (2, 11) = x0

k = 0

For i = 0 To 100

Cells (2 + i, 12) = «»

Cells (2 + i, 13) = «»

Cells (2 + i, 14) = «»

Cells (2 + i, 15) = «»

Next i

Do While Abs (a — b) >= e

x1 = (a + x0) / 2 + (Cos (a) / (a * a) — Cos (x0) / (x0 * x0)) / (2 * L)

x2 = (x0 + b) / 2 + (Cos (x0) / (x0 * x0) — Cos (b) / (b * b)) / (2 * L)

fx1 = Cos (x1) / (x1 * x1)

fx2 = Cos (x2) / (x2 * x2)

Cells (2 + k, 12) = x1

Cells (2 + k, 13) = x2

Cells (2 + k, 14) = fx1

Cells (2 + k, 15) = fx2

If fx1 < fx2 Then

a = x1

x0 = x2

Else

b = x2

x0 = x1

End If

k = k + 1

Loop

If (Cos (x1) / (x1 * x1)) < (Cos (x2) / (x2 * x2)) Then

TextBox5.Value = Round (x1, 4)

TextBox4.Value = Round (Cos (x1) / (x1 * x1), 5)

Else

TextBox5.Value = Round (x2, 4)

TextBox4.Value = Round (Cos (x2) / (x2 * x2), 5)

End If

Cells (18, 7) = TextBox5. Value

Cells (18, 8) = TextBox4. Value

End Sub

2.1.4 Π˜Π½Ρ‚Π΅Ρ€ΠΏΡ€Π΅Ρ‚Π°Ρ†ΠΈΡ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ²

2.2 ΠŸΠΎΡΡ‚Π°Π½ΠΎΠ²ΠΊΠ° Π·Π°Π΄Π°Ρ‡ΠΈ Π·Π°Π΄Π°Π½ΠΈΠ΅ 2

Π—Π°Π΄Π°Π½ΠΈΠ΅ 2. Найти наимСньшСС (наибольшСС) Π·Π½Π°Ρ‡Π΅Π½ΠΈΠ΅ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΏΡ€ΠΈ ΠΌΠ΅Ρ‚ΠΎΠ΄ΠΎΠΌ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска.

.

ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ пуска

Π‘ΡƒΡ‚ΡŒ ΠΌΠ΅Ρ‚ΠΎΠ΄Π° Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска состоит Π² ΡΠ»Π΅Π΄ΡƒΡŽΡ‰Π΅ΠΌ. Как ΠΈ ΠΏΡ€Π΅ΠΆΠ΄Π΅, Π² Π½Π°Ρ‡Π°Π»ΡŒΠ½ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ опрСдСляСтся Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚ ΠΌΠΈΠ½ΠΈΠΌΠΈΠ·ΠΈΡ€ΡƒΠ΅ΠΌΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ. Однако Ρ‚Π΅ΠΏΠ΅Ρ€ΡŒ Π² Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΈ Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π° дСлаСтся Π½ΠΈ ΠΎΠ΄ΠΈΠ½ шаг, Π° Π΄Π²ΠΈΠΆΡƒΡ‚ся Π² Π΄Π°Π½Π½ΠΎΠΌ Π½Π°ΠΏΡ€Π°Π²Π»Π΅Π½ΠΈΠΈ Π΄ΠΎ Ρ‚Π΅Ρ… ΠΏΠΎΡ€, ΠΏΠΎΠΊΠ° цСлСвая функция ΡƒΠ±Ρ‹Π²Π°Π΅Ρ‚, достигаСт Π² Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ°. Π’ ΡΡ‚ΠΎΠΉ Ρ‚ΠΎΡ‡ΠΊΠ΅ ΠΎΠΏΡΡ‚ΡŒ ΠΎΠΏΡ€Π΅Π΄Π΅Π»ΡΡŽΡ‚ Π°Π½Ρ‚ΠΈΠ³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚ ΠΈ ΠΈΡ‰ΡƒΡ‚ Π½ΠΎΠ²ΡƒΡŽ Ρ‚ΠΎΡ‡ΠΊΡƒ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° Ρ†Π΅Π»Π΅Π²ΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ ΠΈ Ρ‚Π°ΠΊ Π΄Π°Π»Π΅Π΅. Π’ Π΄Π°Π½Π½ΠΎΠΌ ΠΌΠ΅Ρ‚ΠΎΠ΄Π΅ спуск ΠΈΠΌΠ΅Π΅Ρ‚ Π±ΠΎΠ»Π΅Π΅ цСлСустрСмлённый Ρ…Π°Ρ€Π°ΠΊΡ‚Π΅Ρ€, производится Π±ΠΎΠ»Π΅Π΅ ΠΊΡ€ΡƒΠΏΠ½Ρ‹ΠΌΠΈ шагами ΠΈ Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ вычисляСтся Π² ΠΌΠ΅Π½ΡŒΡˆΠ΅ΠΌ числС Ρ‚ΠΎΡ‡Π΅ΠΊ.

ОписаниС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΏΡ€Π΅Π΄Π½Π°Π·Π½Π°Ρ‡Π΅Π½Π° для нахоТдСния Ρ‚ΠΎΡ‡Π΅ΠΊ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ Π½Π΅ΡΠΊΠΎΠ»ΡŒΠΊΠΈΡ… ΠΏΠ΅Ρ€Π΅ΠΌΠ΅Π½Π½Ρ‹Ρ… — Π΄Ρ€ΡƒΠ³ΠΈΠΌΠΈ словами для ΠΌΠΈΠ½ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΈ этих Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ.

Π’ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ Ρ€Π΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½ ΠΎΠ΄ΠΈΠ½ ΠΈΠ· ΠΌΠ΅Ρ‚ΠΎΠ΄ΠΎΠ² спуска — Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π½Ρ‹ΠΉ ΠΌΠ΅Ρ‚ΠΎΠ΄ спуска с Π²Ρ‹Π±ΠΎΡ€ΠΎΠΌ шага. ИзмСнСниС шага осущСствляСтся ΠΏΠΎ ΡΡ…Π΅ΠΌΠ΅:

Ссли Ссли

ВычислСниС Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π° происходит ΠΏΠΎ ΠΌΠ΅Ρ‚ΠΎΠ΄Ρƒ с ΠΏΠ°Ρ€Π½Ρ‹ΠΌΠΈ ΠΏΡ€ΠΎΠ±Π°ΠΌΠΈ, это ΡƒΠ»ΡƒΡ‡ΡˆΠ°Π΅Ρ‚ поиск Π·Π° ΡΡ‡Ρ‘Ρ‚ Π±ΠΎΠ»Π΅Π΅ Ρ‚ΠΎΡ‡Π½ΠΎΠ³ΠΎ вычислСния Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π°.

ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска ΠΏΠΎ ΡΡ€Π°Π²Π½Π΅Π½ΠΈΡŽ с ΠΎΠ±Ρ‹Ρ‡Π½Ρ‹ΠΌ Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π½Ρ‹ΠΌ ΠΌΠ΅Ρ‚ΠΎΠ΄ΠΎΠΌ Π΄Π°Π΅Ρ‚ Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€ΠΎΠ΅ ускорСниС, ΠΌΠ΅Ρ‚ΠΎΠ΄ Ρ…ΠΎΡ€ΠΎΡˆΠΎ «Ρ€Π°Π±ΠΎΡ‚Π°Π΅Ρ‚» ΠΏΡ€ΠΈ ΠΌΠΈΠ½ΠΈΠΌΠΈΠ·Π°Ρ†ΠΈΠΈ Π³Π»Π°Π΄ΠΊΠΈΡ… Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΉ ΠΈ Π΅ΡΠ»ΠΈ Π½Π°Ρ‡Π°Π»ΡŒΠ½ΠΎΠ΅ ΠΏΡ€ΠΈΠ±Π»ΠΈΠΆΠ΅Π½ΠΈΠ΅ Π²Ρ‹Π±Ρ€Π°Π½ΠΎ достаточно Π΄Π°Π»Π΅ΠΊΠΎ ΠΎΡ‚ ΠΎΠΏΡ‚ΠΈΠΌΡƒΠΌΠ°. Если ΠΆΠ΅ очСрСдная Ρ‚ΠΎΡ‡ΠΊΠ° окаТСтся Π² ΠΎΠΊΡ€Π΅ΡΡ‚ности ΠΎΠΏΡ‚ΠΈΠΌΡƒΠΌΠ°, Ρ‚ΠΎ ΡƒΠΌΠ΅Π½ΡŒΡˆΠ΅Π½ΠΈΠ΅ Ρ†Π΅Π»Π΅Π²ΠΎΠΉ Ρ„ΡƒΠ½ΠΊΡ†ΠΈΠΈ Π±ΡƒΠ΄Π΅Ρ‚ ΠΎΡ‡Π΅Π½ΡŒ ΠΌΠ΅Π΄Π»Π΅Π½Π½Ρ‹ΠΌ. Π­Ρ‚ΠΎ происходит ΠΈΠ·-Π·Π° Ρ‚ΠΎΠ³ΠΎ, Ρ‡Ρ‚ΠΎ для получСния ΠΎΠΏΡ‚ΠΈΠΌΡƒΠΌΠ° с Π²Ρ‹ΡΠΎΠΊΠΎΠΉ Ρ‚ΠΎΡ‡Π½ΠΎΡΡ‚ΡŒΡŽ Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ Π²Ρ‹ΠΏΠΎΠ»Π½ΠΈΡ‚ΡŒ большоС число ΠΌΠ΅Π»ΠΊΠΈΡ… шагов.

ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска хотя Π½Π΅ Π΄Π°Π΅Ρ‚ особСнного ускорСния сходимости ΠΎΠ½ ΡΠ²ΠΎΠ±ΠΎΠ΄Π΅Π½ ΠΎΡ‚ ΠΏΠ°Ρ€Π°ΠΌΠ΅Ρ‚Ρ€ΠΎΠ² ΠΈ Π½Π° ΠΏΡ€Π°ΠΊΡ‚ΠΈΠΊΠ΅ ΠΌΠΎΠΆΠ΅Ρ‚ Π΄Π°Ρ‚ΡŒ Π½Π΅ΠΊΠΎΡ‚ΠΎΡ€Ρ‹ΠΉ Π²Ρ‹ΠΈΠ³Ρ€Ρ‹Ρˆ, особСнно Π½Π° Π½Π°Ρ‡Π°Π»ΡŒΠ½Ρ‹Ρ… итСрациях.

Π’ ΡΠ²ΡΠ·ΠΈ с ΡΡ‚ΠΈΠΌ Π² ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ΅ Π±Ρ‹Π» Ρ€Π΅Π°Π»ΠΈΠ·ΠΎΠ²Π°Π½ Π±ΠΎΠ»Π΅Π΅ Ρ‚ΠΎΡ‡Π½Ρ‹ΠΉ ΠΌΠ΅Ρ‚ΠΎΠ΄ Π³Ρ€Π°Π΄ΠΈΠ΅Π½Ρ‚Π½ΠΎΠ³ΠΎ спуска.

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

2.2.1 ΠœΠ°Ρ‚Π΅ΠΌΠ°Ρ‚ΠΈΡ‡Π΅ΡΠΊΠ°Ρ модСль Π·Π°Π΄Π°Ρ‡ΠΈ

Π‘Π»ΠΎΠΊ схСма

2.2.2 ОписаниС ΠΌΠ΅Ρ‚ΠΎΠ΄Π° Π°Π½Π°Π»ΠΈΠ·Π° матСматичСской ΠΌΠΎΠ΄Π΅Π»ΠΈ

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° написана Π½Π° ΡΠ·Ρ‹ΠΊΠ΅ программирования VBA Π² ΡΡ€Π΅Π΄Π΅ Microsoft Office Excel.

ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° ΠΈΠΌΠ΅Π΅Ρ‚ понятный ΠΈΠ½Ρ‚ΡƒΠΈΡ‚ΠΈΠ²Π½Ρ‹ΠΉ графичСский интСрфСйс (рис. 2.1).

Рисунок 2.1 Π“Π»Π°Π²Π½ΠΎΠ΅ ΠΎΠΊΠ½ΠΎ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

ПослС запуска Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ ввСсти Ρ‚Ρ€Π΅Π±ΡƒΠ΅ΠΌΡƒΡŽ Ρ‚ΠΎΡ‡Π½ΠΎΡΡ‚ΡŒ вычислСний (рис. 2.2).

Рисунок 2.2 Π’Π²ΠΎΠ΄ Π²Ρ…ΠΎΠ΄Π½Ρ‹Ρ… Π·Π½Π°Ρ‡Π΅Π½ΠΈΠΉ

Π—Π°Ρ‚Π΅ΠΌ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠ° рассчитываСт Ρ‚ΠΎΡ‡ΠΊΠΈ приблиТСния ΠΈ Π½Π°Ρ…ΠΎΠ΄ΠΈΡ‚ для Π΄Π°Π½Π½Ρ‹Ρ… ΠΎΠ³Ρ€Π°Π½ΠΈΡ‡Π΅Π½ΠΈΠΉ Ρ‚ΠΎΡ‡ΠΊΡƒ ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° (рис. 2.3).

Рисунок 2.3 Π’Ρ‹Π²ΠΎΠ΄ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ² расчСта

Π’Π°Π±Π»ΠΈΡ†Π° расчСтов ΠΏΡ€ΠΈΠ²Π΅Π΄Π΅Π½Π° Π² Ρ‚Π°Π±Π»ΠΈΡ†Π΅ 2.1.

Π’Π°Π±Π»ΠΈΡ†Π° 2.1 РасчСт поиска ΠΌΠΈΠ½ΠΈΠΌΡƒΠΌΠ° ΠΏΠΎ ΠΌΠ΅Ρ‚ΠΎΠ΄Ρƒ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска

0,13 868

— 0,29 863

0,660 911

0,72 739

— 0,30 816

0,611 609

0,116 095

— 0,31 354

0,585 191

0,147 855

— 0,31 632

0,571 146

0,170 995

— 0,31 758

0,563 737

0,187 777

— 0,31 797

0,559 853

0,199 903

— 0,31 792

0,557 829

0,208 643

— 0,31 768

0,556 777

0,214 929

— 0,31 738

0,556 232

0,219 445

— 0,31 708

0,555 951

0,222 686

— 0,31 682

0,555 805

0,225 011

— 0,31 661

0,55 573

0,226 678

— 0,31 643

0,555 692

0,227 873

— 0,3163

0,555 672

0,22 873

— 0,3162

0,555 662

0,229 344

— 0,31 612

0,555 656

0,229 784

— 0,31 606

0,555 654

0,230 099

— 0,31 602

0,555 652

0,230 326

— 0,31 599

0,555 652

0,230 488

— 0,31 597

0,555 651

0,230 604

— 0,31 595

0,555 651

0,230 687

— 0,31 594

0,555 651

2.2.3 РСшСниС Π·Π°Π΄Π°Ρ‡ΠΈ

Private Sub CommandButton1_Click ()

Dim e, L, x (1000), y (1000), f (1000) As Double, modgrad

e = Val (TextBox3.Value)

x (0) = 1

y (0) = 1

h = 1

f (0) = x (0) ^ 2 + 2 * y (0) ^ 2 + Exp (x (0) ^ 2 + y (0) ^ 2) — x (0) + 2 * y (0)

For i = 0 To 100

Cells (2 + i, 12) = «»

Cells (2 + i, 13) = «»

Cells (2 + i, 14) = «»

Next i

i = 1

1: x (i) = x (i — 1) — h * (2 * x (i — 1) + 2 * x (i — 1) * Exp (x (i — 1) ^ 2 + y (i — 1) ^ 2) — 1)

y (i) = y (i — 1) — h * (4 * y (i — 1) + 2 * y (i — 1) * Exp (x (i — 1) ^ 2 + y (i — 1) ^ 2) + 2)

f (i) = x (i) ^ 2 + 2 * y (i) ^ 2 + Exp (x (i) ^ 2 + y (i) ^ 2) — x (i) + 2 * y (i)

Cells (1 + i, 12) = x (i)

Cells (1 + i, 13) = y (i)

Cells (1 + i, 14) = f (i)

R = f (i) — f (i — 1)

If R > 0 Then

h = h / 2

GoTo 1

End If

modgrad = Sqr ((2 * x (i) + 2 * x (i) * Exp (x (i) ^ 2 + y (i) ^ 2) — 1) ^ 2 + (4 * y (i) + 2 * y (i) * Exp (x (i) ^ 2 + y (i) ^ 2) + 2) ^ 2)

If modgrad > e Then

i = i + 1

GoTo 1

End If

TextBox5.Value = Round (x (i), 4)

TextBox6.Value = Round (y (i), 4)

TextBox4.Value = Round (f (i), 4)

Cells (18, 7) = TextBox5. Value

Cells (18, 8) = TextBox6. Value

Cells (18, 9) = TextBox4. Value

End Sub

2.2.4 Π˜Π½Ρ‚Π΅Ρ€ΠΏΡ€Π΅Ρ‚Π°Ρ†ΠΈΡ Ρ€Π΅Π·ΡƒΠ»ΡŒΡ‚Π°Ρ‚ΠΎΠ²

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

Π’ Ρ…ΠΎΠ΄Π΅ выполнСния Π΄Π°Π½Π½ΠΎΠ³ΠΎ курсового ΠΏΡ€ΠΎΠ΅ΠΊΡ‚Π° Π±Ρ‹Π»ΠΎ составлСно Π΄Π²Π΅ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ ΠΏΠΎ Π΄Π²ΡƒΠΌ заданиям.

БоставлСны ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹ Π² VBA Π² ΡΡ€Π΅Π΄Π΅ Microsoft Office Excel. ΠŸΠΎΠ΄Ρ€ΠΎΠ±Π½ΠΎΠ΅ описаниС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌ прСдставлСно основной части ΠšΠŸ.

Π’ Π΄Π°Π½Π½ΠΎΠΌ курсовом ΠΏΡ€ΠΎΠ΅ΠΊΡ‚Π΅ всС поставлСнныС мною Π·Π°Π΄Π°Ρ‡ΠΈ Π±Ρ‹Π»ΠΈ Π²Ρ‹ΠΏΠΎΠ»Π½Π΅Π½Ρ‹. Π Π°Π·Ρ€Π°Π±ΠΎΡ‚Π°Π½Π° основная Ρ‡Π°ΡΡ‚ΡŒ ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹. Π˜ΠΌΠ΅Π΅Ρ‚ΡΡ Π²Π²Π΅Π΄Π΅Π½ΠΈΠ΅, Π·Π°ΠΊΠ»ΡŽΡ‡Π΅Π½ΠΈΠ΅, список ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… источников.

Выполняя Π΄Π°Π½Π½ΡƒΡŽ Ρ€Π°Π±ΠΎΡ‚Ρƒ, Π½Π΅ΠΎΠ±Ρ…ΠΎΠ΄ΠΈΠΌΠΎ Π±Ρ‹Π»ΠΎ ΠΎΠ·Π½Π°ΠΊΠΎΠΌΠΈΡ‚ΡŒΡΡ с Π½ΡƒΠΆΠ½ΠΎΠΉ ΠΈΠ½Ρ„ΠΎΡ€ΠΌΠ°Ρ†ΠΈΠ΅ΠΉ ΠΈ ΠΈΠ·ΡƒΡ‡ΠΈΡ‚ΡŒ ΠΏΡ€Π΅Π΄ΠΌΠ΅Ρ‚Π½ΡƒΡŽ ΠΎΠ±Π»Π°ΡΡ‚ΡŒ Π½Π° ΠΎΡΠ½ΠΎΠ²Π΅ спСциализированной Π»ΠΈΡ‚Π΅Ρ€Π°Ρ‚ΡƒΡ€Ρ‹.

ΠŸΠΎΠ»ΡƒΡ‡Π΅Π½Π½Ρ‹ΠΉ мною ΠΎΠΏΡ‹Ρ‚ Ρ€Π°Π±ΠΎΡ‚Ρ‹ ΠΏΠΎΠ·Π²ΠΎΠ»ΠΈΡ‚ Π² Π΄Π°Π»ΡŒΠ½Π΅ΠΉΡˆΠ΅ΠΌ Ρ€Π°Π·Ρ€Π°Π±Π°Ρ‚Ρ‹Π²Π°Ρ‚ΡŒ Π±ΠΎΠ»Π΅Π΅ слоТныС ΠΏΡ€ΠΎΠ΅ΠΊΡ‚Ρ‹.

Бписок ΠΈΡΠΏΠΎΠ»ΡŒΠ·ΠΎΠ²Π°Π½Π½Ρ‹Ρ… источников

Нормативно-тСхничСскиС Π΄ΠΎΠΊΡƒΠΌΠ΅Π½Ρ‚Ρ‹

1 Π“ΠžΠ‘Π’ 19 402–78. ОписаниС ΠΏΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΡ‹

2 Π“ΠžΠ‘Π’ 19 404–79. ΠŸΠΎΡΡΠ½ΠΈΡ‚Π΅Π»ΡŒΠ½Π°Ρ записка. ВрСбования ΠΊ ΡΠΎΠ΄Π΅Ρ€ΠΆΠ°Π½ΠΈΡŽ ΠΈ ΠΎΡ„ΠΎΡ€ΠΌΠ»Π΅Π½ΠΈΡŽ.

3 ΠœΠ΅Ρ‚ΠΎΠ΄ Π»ΠΎΠΌΠ°Π½Ρ‹Ρ… — http://studopedia.net/7_22 267_metod-lomanih.html

4 ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска — http://matlab.exponenta.ru/optimiz/book2/22.php

5 ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска http://otherreferats./mathematics/188 3340.html

6 ΠœΠ΅Ρ‚ΠΎΠ΄ Π½Π°ΠΈΡΠΊΠΎΡ€Π΅ΠΉΡˆΠ΅Π³ΠΎ спуска — http://dit.isuct.ru/ivt/sitanov/Literatura/M171/Pages/Glava23_21.htm

7 ΠŸΡ€ΠΎΠ³Ρ€Π°ΠΌΠΌΠΈΡ€ΠΎΠ²Π°Π½ΠΈΠ΅ Π½Π° VBA Π² Microsoft Office — http://excelvba.ru/books/3

8 ΠœΠ΅Ρ‚ΠΎΠ΄ Π»ΠΎΠΌΠ°Π½Ρ‹Ρ… — http://examhack.narod.ru/21.htm

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