70172

Visual Basic

Курсовая

Информатика, кибернетика и программирование

Целью данной работы является ознакомление с программой Visual Basic и написание в ней программы для решения степенных уравнений методом деления отрезка пополам и методом хорд, а так же с программой, позволяющей решить почти любой пример, Maple.

Русский

2014-10-16

92.5 KB

11 чел.

Сибирский государственный университет телекоммуникации

и информатики

Уральский технический институт связи и информатики

Кафедра физики, прикладной математики и информатики

КУРСОВАЯ РАБОТА

по информатике

на тему: Visual Basic

Выполнил: студент гр. МЕ-41

Лерман М. В.  

                                                                                 Руководитель: Кокорина Е. Е.

Екатеринбург 2005

Содержание.

Введение.

Хотя решение степенных уравнений не ново, но всё ещё актуально, потому что нам всем приходилось решать эти уравнения не раз, и не раз ещё придётся нам поломать голову над ними. И именно теперь, когда у нас появилась возможность решать степенные уравнения на компьютере, экономя свои силы и время, о чём и не могли мечтать студенты учившееся до изобретения компьютера, которым приходилось проводить всё вычислительные операции вручную, мы просто обязаны хотя бы ознакомится с этой возможностью.

Целью данной работы является ознакомление с программой Visual Basic и написание в ней программы для решения степенных уравнений методом деления отрезка пополам и методом хорд, а так же с программой, позволяющей решить почти любой пример, Maple.

Вместе с тем необходимо отметить, что написание программы в Visual Basic и проверка результатов работы программы в пакете Maple являются первоочередными задачами данной работы.

Результаты полученные в ходе проведения работы могут использоваться при решении любой математической или физической задачи сводящейся к решению степенного уравнения.

Основная часть.

1.Основная форма

 

Метод деления отрезка пополам:

Private Sub Command1_Click()

a = 1

b = 1.1

y = CDbl(Text3.Text)

Do While Abs(b - a) > y

c = (a + b) / 2

If F(a) * F(c) < 0 Then b = c Else a = c

Loop

Text4.Text = c

End Sub

Метод хорд:

Private Sub Command2_Click()

a = 1

b = 1.1

y = CDbl(Text3.Text)

Do While Abs(F(c)) > y

c = a + Abs(F(a) / (F(a) - F(b))) * (b - a)

If F(a) * F(b) < 0 Then b = c Else a = c

Loop

Text5.Text = c

End Sub

Кнопка «ВЫХОД»:

Private Sub Command3_Click()

End

End Sub

Задание уравнения:

Public Function F(x)

F = x ^ 5 - x - 0.2

End Function

Кнопка перехода на Form2:

Private Sub Command4_Click()

Form2.Show

End Sub

Кнопка перехода на калькулятор:

Private Sub Command5_Click()

Dim RetVal

RetVal = Shell("calc.exe")

End Sub

Кнопка перехода на Paint:

Private Sub Command6_Click()

Dim RetVal

RetVal = Shell("mspaint.exe")

End Sub

Проверка ошибок ввода:

Private Sub Text3_Change()

If Not IsNumeric(Text3.Text) Then

a = MsgBox("НЕВЕРНЫЙ ВВОД", vbExclamation)

Else

If (Text3.Text > 0.1 Or Text3.Text < 0) Then b = MsgBox("Число должно быть от 0 до 0.1")

End If

End Sub

2.Дополнительные формы.

Часы:

Private Sub Command4_Click()

Form4.Hide

End Sub

Private Sub Command1_Click()

Form1.Show

End Sub

Private Sub Text1_Change()

Text1.Text = Time 'Время

End Sub

Private Sub Text2_Change()

Text2.Text = Date 'Дата

End Sub

Private Sub Timer1_Timer()

Text1.Text = Time 'Таймер

If Time = 0 Then Text2.Text = Date 'Дата меняется в полночь

End Sub

Private Sub Form_Load()

Text2.Text = Date 'дата появляется на циферблате при запуске формы

End Sub

Проверка в пакете Maple.

> solve(x^5-x-0.2=0,x);

Заключение.

Метод хорд точнее ……………………………………………………………

Приложение.

Формы как они есть.

Главная

Часы


 

А также другие работы, которые могут Вас заинтересовать

35961. Подходы к принятию инвестиционных решений на фондовом рынке: фундаментальный и технический анализ 94.14 KB
  Управление проектами – это методология планирования организации и координации трудовых финансовых и материальнотехнических ресурсов на протяжении проектного цикла направленные на эффективное достижение целей проекта путем применение современных методов техники и технологий управления для достижения определенных в проекте результатов по составу и объему работ стоимости времени качеству и удовлетворению участников проекта. Точечные факторы – факторы связанные с реализацией инвестиционного проекта и состоянием реципиента инвестиции....
35963. Неогей 92 KB
  Башкирский антиклинорий сложен почти не метаморфизованными терригеннокарбонатными отложениями рифеявенда общей мощностью 1014 км среди которых в эрозионном окне выступает глубокометаморфизованный дорифейский фундамент отложения которого объединяются в тараташский гранулитовый комплекс мощностью более 5 км сложенный гиперстеновыми плагиогнейсами и амфиболитами. Рифейсковендский комплекс парастратотипический для рифея разделяется на 3 эратемы снизу вверх: бурзяний R1 общей мощностью 34 км залегающую на архее и сложенную в...
35964. Внимание и его свойства 89 KB
  Устойчивость внимания – длительность сосредоточения внимания на объекте. Устойчивость внимания проявляется в способности в течение длительного времени сохранять состояние внимания на какомлибо объекте предмете деятельности не отвлекать и не ослаблять внимание. У младших школьников устойчивость внимания активно возрастает к 910 годам. Сосредоточенность внимания – степень концентрации внимания на объекте.
35966. Типы восприятия эфирной информации 87 KB
  Преодоление этого объективного противоречия между массовой направленностью и индивидуальностью приема радиопередачи является одним из важных критериев профессионализма радиожурналиста и требует с одной стороны умения говорить на языке потребностей и мотивов поведения всей аудитории выбирать темы и содержание актуальные для нее а с другой – особого стиля общения: доверительномежличностного уважительного по отношению к собеседнику. Пространственная и психологическая рассредоточенность аудитории Аудитория радио не просто...
35967. Понятийный аппарат АХД предприятия 85.5 KB
  Сам термин анализ происходит от греческого слова nlyzis что в переводе означает разделяю расчленяю . Следовательно анализ в узком плане представляет собой расчленение явления или предмета на составные его части элементы для изучения их как частей целого. Наиболее близок к анализу в этом смысле синтез который выявляет связи и зависимости между отдельными частями изучаемого предмета соединяет их в единое целое. под анализом в широком плане понимается способ познания предметов и явлений окружающей среды основанный на расчленении целого...
35968. Схема алкогольного брожения. Влияние основных и вторичных продуктов брожения на формирование органолептических качеств вина. Технохимический и микробиологический контроль брожения. Оформление результатов 84.69 KB
  Влияние основных и вторичных продуктов брожения на формирование органолептических качеств вина. Глюкоза Фосфоенолпируват Пируват Альдегид Этанол Пируватдекарбоксилаза Алкогольдегид рогеназа CO2 NDHH ND Из биологических процессов протекающих в сусле и винах при участии микроорганизмов главным является спиртовое брожение. глицерин влияет на вкус вина придавая ему ощущение сладости и мягкости. Лимонная кислота будучи малоустойчивой в вине может быть источником летучих кислот которые являются показателем наличия пороков у вина.