ВІКІСТОРІНКА
Навигация:
Інформатика
Історія
Автоматизація
Адміністрування
Антропологія
Архітектура
Біологія
Будівництво
Бухгалтерія
Військова наука
Виробництво
Географія
Геологія
Господарство
Демографія
Екологія
Економіка
Електроніка
Енергетика
Журналістика
Кінематографія
Комп'ютеризація
Креслення
Кулінарія
Культура
Культура
Лінгвістика
Література
Лексикологія
Логіка
Маркетинг
Математика
Медицина
Менеджмент
Металургія
Метрологія
Мистецтво
Музика
Наукознавство
Освіта
Охорона Праці
Підприємництво
Педагогіка
Поліграфія
Право
Приладобудування
Програмування
Психологія
Радіозв'язок
Релігія
Риторика
Соціологія
Спорт
Стандартизація
Статистика
Технології
Торгівля
Транспорт
Фізіологія
Фізика
Філософія
Фінанси
Фармакологія


ЭТАП 3. Определение элементов управления ввода-вывода

На данном этапе необходимо определиться с элементами управления, которые будут использоваться для ввода и вывода данных. Добавление элементов происходит с панели инструментов Toolbox (в случае отсутствия данной панели на экране необходимо: Insert à Toolbox)

 

ИСХОДНЫЕ ДАННЫЕ

ввод N, Ncol, Nstr
Наличие в блок-схеме блока ввода данных N, Nstr, Ncol требует добавления в форму трех элементов управления типа TextBox.

Поэтому создаем для переменных N, Nstr, Ncol соответствующие элементы управления и меняем некоторые из его свойств:

N – элемент управления TextBox с такими свойствами: Name – TextN

Nstr – элемент управления TextBox с такими свойствами: Name – TextNstr

Ncol – элемент управления TextBox с такими свойствами: Name – TextNcol

Ввод массива bi происходит с листа Microsoft Excel, поэтому для его ввода не требуется элемента управления.

На форме также необходимо установить элемент управления Поле со списком (


CommandButton: Name - CmdClr
Label: Name – LabelCriteriy
OptionButton: Name – OptionPrint2
TextBox: Name - TextNcol
ListBox: Name - ListBoxCriteriy
OptionButton: Name - OptionPrint1
Frame: Name - FrameMasive
Frame: Name - FrameCriteriy
Frame: Name - FramePrint
Label: Name - LabelN
TextBox: Name - TextN
TextBox: Name - TextNstr
Label: Name – LabelMasive
CommandButton: Name - CmdExit
CommandButton: Name - CmdStart



1. Visual Basic

2. Добавляем пользовательскую форму: Insert à UserForm

3. Задаем свойства формы в окне Properties (если данное окно отсутствует, то нужно нажать функциональную клавишу F4):

NameLaba2,

Caption – Лабораторная работа № 2. Обработка массивов

4. Добавляем элементы управления Label и TextBox, и задаем их свойства. Например,

- для переменной N:

для ввода NameTextN

5. Добавляем элементы управления Frame, OptionButton и ListBox, и задаем их свойства.

6. Добавляем кнопки CommandButton и задаем их свойства. Например,

- для кнопки Запуск:

NameCmdStart

Caption – Вычисление

- для кнопки Очистка:

NameCmdClr

Caption – Очистка

- для кнопки Выход:

NameCmdExit

Caption – Выход


ЭТАП 5. Написание обработок событий

В созданной пользовательской форме три кнопки, следовательно, к каждой из этих кнопок необходимо написать процедуру обработки ее нажатия. Для написания обработки события «нажатия мышкой» необходимо в режиме добавления элементов управления щелкнуть дважды мышкой по соответствующей кнопке.


Для кнопки «Очистка» необходимо:

1. Произвести двойной щелчок по кнопке, появится окно Кода формы и в нем будет уже написано:

2. Написать код процедуры очистки всех элементов управления TextBox (в нашем случае это три элемента – TextN, TexNstr и TextNcolt):


Для кнопки «Выход» необходимо:

1. Произвести двойной щелчок по кнопке, появится окно Кода формы и в нем будет уже написано:

2. Написать код процедуры выхода из приложения, что происходит командой End, т.е. код программы примет вид:


При выделении (выборе) одного из возможных элементов списка «Исключить» или «Заменить на 1» необходимо запомнить это значение, чтобы дальше его использовать.

1. Перейти в режим Код, выбрав View à Code или нажать соответствующую кнопку.

2. Создать основу для процедуры, для этого необходимо выбрать объект ListBoxCriteriy и событие Click:

В коде программы появиться следующий текст.

Ввести код процедуры:

Для кнопки «Запуск» необходимо:

1. Произвести двойной щелчок по кнопке и ввести код процедуры, согласно блок-схеме, т.е. код программы примет вид:

Также необходимо описать все переменные участвующие в программе, согласно блок-схеме или указанной выше программе имеем следующие переменные:

N, Nstr, Ncol, i, k, Criteriy

и массивы

b(100), c(100)

Следовательно, в программе необходимо указать следующий код описания этих переменных

 

ЭТАП 6. Запуск программы, получение и проверка результатов

1. Перед запуском программы необходимо сформировать массив на «Листе1» в Excel, например

2. Для запуска программы необходимо нажать кнопку Run

3. В появившейся форме заполнить текстовые поля и выбрать критерий обработки массива и место вывода нового массива.


4. В появившейся форме нажать кнопку Запуск, при этом значениянового массива будут выведены на текущий лист, т.е. «Лист1».

5. Проверка правильности полученных результатов:

исключить
заменить на 1
 
Вывод результатов: на текущий лист
 
CommandButton: Name – CmdStart
CommandButton: Name – CmdStart
CommandButton: Name – CmdStart

 


 


 

ЗАДАНИЯ К ЛАБОРАТОРНОЙ РАБОТЕ

 

Вариант 1

Записать положительные или отрицательные элементы массива подряд в массив .

Вариант 2

Записать элементы массива с четными или нечетными индексами подряд в массив .

 

Вариант 3

Записать четные или нечетные элементы массива подряд в массив .

 

Вариант 4

Переставить элементы массива в обратном порядке или поменять местами пары соседних элементов.

 

Вариант 5

Упорядочить элементы массива в порядке возрастания или убывания.

 

Вариант 6

Составить массив, состоящий из частного или сумм пар соседних элементов исходного массива.

 

Вариант 7

Составить массив, состоящий из удвоенных или разделенных на два элементов исходного массива.

 

Вариант 8

Составить массив, состоящий из элементов исходного массива, удовлетворяющих условию: больших 1 или меньших 1.

 

Вариант 9

Составить массив, состоящий из обратных элементов исходного массива или возведенных в квадрат.

 

Вариант 10

Составить массив, состоящий из возведенных в квадрат или в степень 1/2 положительных элементов исходного массива.

Вариант 11

Извлечь корень 3 степени или умножить на 3 каждый положительный элемент исходного массива, сформировать из них новый массив.

 

Вариант 12

Все отрицательные элементы массива заменить нулями или противоположными значениями, сформировать новый массив.

 

Вариант 13

Все нулевые элементы массива исключить или заменить на 1, сформировать новый массив.

 

Вариант 14

Записать элементы массива , которые делятся на 3 нацело или с остатком подряд в массив .

Вариант 15

Составить массив, состоящий из среднего арифметического или разности пар соседних элементов исходного массива.

 

Вариант 16

Записать четные или нечетные элементы массива подряд в массив , при этом четные прологарифмировать, а нечетные разделить на 2.

 

Вариант 17

Составить массив, состоящий из элементов исходного массива, которые принадлежат отрезку и тех, которые не принадлежат ему.

 

Вариант 18

Составить массив, состоящий из отрицательных элементов исходного массива или их модулей.

 

Вариант 19

Составить массив, состоящий из положительных или увеличенных в два раза отрицательных элементов исходного массива.

 

Вариант 20

Составить массив , состоящий из элементов исходного массива , удовлетворяющих условию: или

Вариант 21

Составить массив, состоящий из отрицательных обратных элементов исходного массива или возведенных в квадрат.

 

Вариант 22

Составить массив , состоящий из элементов исходного массива , удвоенных или уменьшенных в три раза.

 

Вариант 23

Заменить каждый положительный элемент массива на -1 или отрицательный на 1.

 

Вариант 24

Все положительные элементы массива заменить противоположными значениями или обратными величинами, сформировать новый массив.

 

Вариант 25

Записать корень квадратный из положительных или удвоенные отрицательные элементы массива подряд в массив .

 

Вариант 26

Записать квадрат четных или куб нечетных элементов массива подряд в массив .

Вариант 27

Записать элементы массива с четными или нечетными индексами в массив в порядке возрастания.

 

Вариант 28

Составить массив, состоящий из элементов исходного массива, которые не принадлежат отрезку и тех, которые принадлежат ему.

Вариант 29

Записать четные или нечетные элементы массива подряд в массив , при этом четные увеличить на 3, а нечетные уменьшить на 2.

 

 

Вариант 30

Составить массив, состоящий из элементов исходного массива больше 1 или меньше -1.

 

Вариант 31

Составить массив, состоящий из модулей отрицательных или положительных элементов исходного массива.

 

Вариант 32

Составить массив, состоящий из суммы или произведения пар соседних элементов исходного массива.

 

 

ЛАБОРАТОРНАЯ РАБОТА № 3
Тема: «Реализация метода наименьших квадратов в среде VBA»

 

Цель: Получение навыков экспериментальной обработки информации путем реализации МНК с применением языка программирования VBA.

Ход работы.

1. Создать форму пользователя в среде VBA для реализации метода наименьших квадратов. Исходные данные (результаты эксперимента) взять из условий задания.

2. Ввод исходных данных реализовать с листа MS Excel (результаты эксперимента) и через текстовое поле формы (количество измерений).

3. Результаты вычислений вывести в форму (текстовое поле или комментарий).

4. Найти абсолютную погрешность метода (чтобы найти абсолютную погрешность, необходимо взять любую точку y* на заданном отрезке экспериментальных данных и посчитать значение функции в точке y*; сравнить полученное значение функции со значением из таблицы экспериментальных данных по формуле ).

5. В отчете представить:

a) графическое представление исходных данных;

b) аналитическую подготовку для реализации метода наименьших квадратов;

c) блок-схему алгоритма;

d) листинг всех процедур и функций;

e) заполненную исходной информацией и результатами расчетов форму пользователя с указанием всех задействованных элементов управления и их основных свойств: имени, заголовка, значения, начального значения и т.п.;

f) листинг рабочего листа с исходными данными.

Пример решения задания

Задание

В результате опытов был получен следующий набор значений:

x
y 9,8 12,1 12,9 14,0 16,0 17,9 18,3 21,2 24,0 25,3 26,1

Необходимо установить аналитическую зависимость между переменными x и y (метод наименьших квадратов). В качестве приближающей функции нужно выбрать линейную функцию вида .


Решение поставленной задачи

© 2013 wikipage.com.ua - Дякуємо за посилання на wikipage.com.ua | Контакти