Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
RGR_5.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
846.34 Кб
Скачать

Текст програми

Sub rozgal()

' rozgal Макрос

MsgBox ("розгалуджений алгоритм")

'оголошення змінних

Dim a As Single, b As Single, t As Single, w As Single

'уведення данних

a = InputBox("уведіть a")

b = InputBox("уведіть b")

t = InputBox("уведіть t")

'обчислення значення функції w

If t < 0.1 Then

w = Sqr(a * t ^ 2 + b * Sin(t) + 1)

Else

If t = 0.1 Then

w = a * t + b

Else

w = Sqr(a * t ^ 2 + b * Cos(t) + 1)

End If

End If

MsgBox ("значення w= " + Str(w))

End Sub

Результати роботи програми

Результати обчислення програмою за першою формулою при t=-2 (рис 3.2.):

Рис 3.2. Результати роботи програми за першою формулою

Результати обчислення програмою за другою формулою при t=0,1 (рис 3.3):

Рис 3.3. Результати роботи програми за другою формулою

Результати обчислення програмою за третьою формулою при t=2 (рис 3.4):

Рис 3.4. Результати роботи програми за третьою формулою

Перевірка роботи програми

Для перевірки результатів роботи програми використаємо Microsoft Office Excel 2003.

Висновок: я навчився розробляти розгалужені алгоритми та створювати за їх допомогою програми для знаходження розв’язків заданих функцій. Також при перевірці за допомогою Excel я переконався у тому, що програма правильно знаходить розв’язки функцій.

Висновок

Завдяки цій роботі я вдосконалив свої навички розв’язання задач даного типу за допомогою VBA з використанням алгоритмів лінійної та розгалуженої структури. При вирішенні кожної задачі розробив, блок-схему алгоритму, таблицю ідентифікаторів і текст програми мовою VBA. Також

Використавши Excel я переконався у тому, що програма правильно знаходить розв’язки функцій.

Виконавши свою розрахунково-графічну роботу я дійшов висновку, що за допомогою VBA можливо достатньо швидко і надійно обрахувати розв’язки даного типу задач.

Список використаних літературних джерел

  1. ДСТУ Б А.2.4-4-99. Система проектної документації для будівництва. Основні вимоги до робочої документації. – Введений на заміну ДСТУ Б А.2.4-4-95 наказом Держбуду України № 117 від 11.05.99р.; Чинний від 01.10.99 .– Київ, 1999.– 59 с.

  2. Глушаков C.B. Microsoft Office 2000. – Харьков: Фолио, 2002. – 432 с.

  3. Вальдрат О.Л. Робота з Microsoft Excel 2000 / О.Л. Вальдрат, Р.Б. Чаповська. – Київ: ЦУЛ, 2002. – 186 с.

  4. Э. Виллет Office ХР. Библия пользователя. – М.: Диалектика, 2002. – 843 с.

  5. Дибкова Л.М. Інформатика та комп'ютерна техніка. – К.: Alma Mater, 2002. – 318 с.

  6. Рогоза М.Є. ХР: Windows, Word, Excel для самостійного вивчення. – К.: ЦУЛ, 2003. – 294 с.

  7. Глушаков С.В. Microsoft Office 2003 / С.В. Глушаков, А.С. Сурядний. – Харьков: Фолио, 2005. – 511 с.

  8. Камминг, Стив. VBA для "чайников", 3-е издание.: Пер.с англ. – М.: Издательский дом "Вильямc", 2001.— 448c.

  9. А. Васильев, А. Андреев. VBA в Office 2000. C.-Пб.: Питер, 2001. – 409c.

  10. Демидова Л.А., Пылькин А.Н. Программирование в среде Visual Basic for Application. М.: Телеком 2004.

  11. Гетц К., Джилберт М. Программирование в Microsoft Office. К.: Издательская группа BHV, 1999.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]