Автор работы: Пользователь скрыл имя, 12 Ноября 2011 в 16:15, курсовая работа
При разработке новых конструкций, механизмов и т.п. возникает необходимость выбора наилучшего варианта из всех возможных. Такой процесс называют оптимизацией. В процессе решения задачи оптимизации обычно необходимо найти оптимальные значения некоторых проектных параметров, определяющих данную задачу.
Введение……………………………………………………………………3
1. Задание к курсовому проекту…………………………………………..4
1.1.Теоретическая часть .Метод деления отрезка пополам……………..5
1.2.Ход работы .Построение графика функции в Excel…………………6
1.3.Блок-схема программы……………….. ………………………………7
1.4.Листинг программы…………………………………………………....8
2.Теоретическая часть. Массивы. ………………………………………..10
2.1.Блок-схема программы ……………………………………………….11
2.2.Листинг программы…………………………………………………...12
Выводы……………………………………………………………………..14
Список литературы………………………………………………………...15
i,j=1
min=(1,1)
i=m
j=n
a(i,i)<min
min=a(i,j)
a(i,j)>max
max=a(i,j)
j=j+1
i=i+1
avg = (max + min) / 2
avg
конец
2.2.Листинг программы
Private Sub Command1_Click()
Dim i, j, n, m As Integer
'Задаем размерность массива
n = Text1.Text
m = Text2.Text
'Объявляем динамический массив
Dim a() As Integer
ReDim Preserve a(m, n)
'Очищаем поле вывода массива
Label1.Caption = ""
For i = 1 To m
For j = 1 To n
'Записываем в i,j элемент матрицы случайное число
a(i, j) = 50 - Rnd * 100
'Выводим его
Label1.Caption = Label1.Caption + Str(a(i, j))
Next j
'В конце каждой строки переносим на след. строку
Label1.Caption = Label1.Caption + Chr(13)
Next i
i = 0
j = 0
Dim min, max As Integer
Dim avg As Single
'Записываем в min и max первый элемент матрицы
min = a(1, 1)
max = a(1, 1)
'Находим мин и макс элементы
For i = 1 To m
For j = 1 To n
If a(i, j) < min Then min = a(i, j)
If a(i, j) > max Then max
= a(i, j)
Next j
Next i
Label7.Caption = max
Label8.Caption = min
'Расчитываем среднее арифметическое
avg = (max + min) / 2
Label9.Caption = avg
End Sub
Выполняя данную работу я , познакомился с двумя методами для нахождения минимального значения функции на определенном промежутке и на примере 1-го задания выполнил задачу применив один из этого метода – метод «деления отрезка пополам». Выяснил, каким образом работает алгоритм программы и как необходимо его написать для более эффективной работы программы путем уменьшения числа шагов.
Выполняя
второе задание курсовой работы .Я научился
выполнять различные действия над массивами:
ввод, вывод элементов, поиск, сравнение.
Научились оптимизировать свои алгоритмы.
Список
1.Турчак Л.И. Основы численных методов: Учебное пособие. – М.: 2.Наука. Гл. ред. Физ.мат. лит., 1987. – 320с.
2.Шемелин В.К. Проектирование систем управления в . машиностроении: 3.Учебник для студентов технических вузов. – М.: Издательство “Станкин”, 1998. – 254с.
4.Светозарова Г.И. и др. Практикум по программированию на алгоритмических языках. – М.: Наука, 1980.
5.Гутер Р.С. ,
Овчинский Б.В. «Элементы
6.Калиткин Н.Н. «Численные методы». Москва, «Наука», 1978
7.Крылов В.И.,
БабковВ.В., Монастырский П.И. «
8.П. Санна. «Visual Basic for Applications 6.0 «в подлиннике», Киев, BHV
9. Microsoft Visual Basic 2005 (+ CD-ROM): Майкл Хальворсон — Санкт-Петербург, ЭКОМ Паблишерз, 2007 г.- 640 с.
10.isual Basic .NET. Практическое
руководство для начинающего
программиста: М. А. Трусов —
Санкт-Петербург, НТ Пресс, 2006 г.-
176 с.
Информация о работе Метод деления отрезка пополам на Visual basic и создание массива