
Розрахункова робота_V11Медведчук
.docx
ДЕРЖАВНА ПОДАТКОВА CЛУЖБА УКРАЇНИ
НАЦІОНАЛЬНИЙ УНІВЕРСИТЕТ ДПС УКРАЇНИ
Факультет економіки та оподаткування
Кафедра інформаційних систем і технологій
РОЗРАХУНКОВА РОБОТА
з дисципліни Інформатика
Виконана студентом
групи ОБА 12-3
Медведчука Дмитра
Науковий керівник
Старший викладач
Гладченко Оксана Вікторівна
Ірпінь – 2013
План–графік
захисту розрахункових робіт
Медведчук Дмитро Володимирович
(прізвище, ім’я, по-батькові, група)
№ роботи |
Назва теми |
Термін видачі завдання |
Термін захисту завдання |
Max. кількість балів, яку можна отримати |
Бали |
Підпис викладача, (який приймає захист) |
№1 |
|
|
|
|
|
|
№2 |
|
|
|
|
|
|
№3 |
|
|
|
|
|
|
Загальна кількість балів, одержана за всі розрахункові роботи |
|
|
|
Зміст
Вступ…………………………………………………………………………………4
Розділ1………………………………………………………………………………..5
Розділ2…………………………………………………………………………………………….10
Висновки…………………………………………………………………………14
Список використаних джерел…………………………………………...15
Додатки…………………………………………………………………………....16
ВСТУП
Зі стрімким розвитком інформаційних технологій зростає роль автоматизації роботи. Інтегроване середовище Visual Basic, яке поєднує візуальні засоби проектування програмних продуктів, підтримку сучасних інформаційних технологій, роботу з базами даних тощо. Побудований на архітектурі об’єктно-орієнтованих елементів керування. Visual Basic дає змогу багатократно використовувати уже створений код, зменшуючи тим самим час і зусилля, які витрачаються на розроблення програмних продуктів.
Простота мови Visual Basic for Application це одна із переваг інтегрованого середовища Visual Basic адже невелика кількість команд та простота операторів, які використовуються у цій мові програмування дає можливість швидко її освоїти та використовувати її у своїй професійній діяльності. Також ця перевага дасть змогу швидко адаптувати персонал який не мав досвіду роботи з цим видом програмного забезпечення. Безперечно, що роль автоматизації праці має місце на сучасних підприємствах. Вона дає змогу одній людині за короткий час провести такі операції як:
Облік витрат;
Облік доходів;
Витрати на заробітну плату;
Та безліч інших операцій яких вимагають від офісних співробітників. Також Варто зазначити, що працівнику легше отримати роботу якщо у нього є досвід роботи та навички у роботі з програмним забезпеченням.
Саме тому і варто звернути свою увагу на основи офісного програмування та особливості мови програмування Visual Basic. Та покращити рівень знань у цій галузі.
Розділ і
Алгоритмізація обчислювальних процесів
Постановка завдання
Скласти схему алгоритму i програму для знаходження функції :
, x=2,1;
2,3 y=3,2 z=1,5
Формалізуйте завдання
Вхідні дані: x,y,z
Результат : F
Обмеження якщо x<yто перша формула інакше x>y то друга формула.
Початок
Задайте значення
Якщо х < y, то F= log(x+y)*z
Якщо х > y, то F= (((x-y)-x^3)/((x^2+y^2+z^2)*exp(z)))
Вивести F
Кінець
Побудуйте блок-схему. Для цього включить панель інструментів Рисованиє → Автофігури → Блок-схема.
Збережіть документ
Алгоритм розв‘язування завдання.(словесний)
Вводимо x,y,z
Перевіримо умову чи x<y
Якщо умова справджується то значення F обчислюємо першою формулою (F= log(x+y)*z)
Виводимо результат
Кінець алгоритму.
Якщо ж умова не справджується то перевіряємо умову x>y
Якщо так знаходимо значення F= (((x-y)-x^3)/((x^2+y^2+z^2)*exp(z)))
Виводимо значення F
Кінець алгоритму
Код програми:
Public Sub Розрахункова_Завдання1_Медведчук()
Dim x, y, z As Double
Dim f As Variant
x = Cells(5, 1)
y = Cells(5, 2)
z = Cells(5, 3)
If x < y Then f = Log(x + y) * z Else
If x > y Then f = ((x - y0 - x ^ 3) / ((x ^ 2 + y ^ 2 + z ^ 2) * Exp(z)))
If x = y Then f = " значення х не задовольняє умову "
Cells(5, 4) = f
End Sub
Див. Додаток А, В
Блок-схемa Завдання 1, Розділ 1
+
Завдання на створення функції користувача :
1. Постановка завдання
F(x)
=
Скласти схему алгоритму i програму для знаходження добутку функції :
2.Формалізацію завдання :
Вхідні дані: x
Результат : F
Початок
Задайте значення х
Обчислити F(x)=x^4+1.5*x^3-2*x^2+4*cos(2*x)*sin(4*x)
Вивести F
Кінець
Побудуйте блок-схему. Для цього включить панель інструментів Рисованиє → Автофигури → Блок-схема
Збережіть документ
3.Алгоритм розв‘язування завдання (словесний)
Вводимо x
Обчислюємо F(x)= x^4+1.5*x^3-2*x^2+4*cos(2*x)*sin(4*x
Виводимо значення F
Кінець алгоритму
Див. Додаток : С
Блок-схема Завдання 1.2 Додаток C
РОЗДІЛ 2
Реалізація обчислювальних алгоритмів та аналіз даних в MS Excel
Завдання 2.1
1.Постановка завдання
С
класти
схему алгоритму i програму для
знаходження суми функції :
S=
Формалізація завдання в MS Word
Вхідні дані: i,j
Проміжні дані : S
Результат : Sum
Обмеження i <>-7 або i <>-3
3.Алгоритм розв‘язування завдання
Завдання 1:
Початок
Введемо значення : i,j
Присвоюємо Sum=0
Прирівняємо значення i до , i = k
Перевіримо умову i <>-7 або i <>-3
Якщо умова справджується то виводимо надпис «Розв’язку не має»,Кінець алгоритму.
Якщо умова не справджується використовуємо проміжне значення S і
присвоюємо йому значення S=((i * (i + 1)) / ((i + 7) * (i + 3)))
Далі значення Sum додамо на S, Sum = Sum +S
Потім до значення i додамо 1 , i:=k+1
Перевіримо чи значення і не перевищило значення j, i <=j
Якщо не перевищило, тоді повторити алгоритм починаючи з перевірки значення i <>-7 або i <>-3
І так доти поки i не перевищить j.
В такому випадку виводимо значення Sum
Кінець алгоритму.
Код завдання 2.1
Public Sub Розрахункова2_Медведчук()
Dim i, k, j, S, Sum as Integer
k = 3
i = k
j = 5
Sum = 0
If ((i + 7) * (i + 3)) <> 0 Then
S = ((i * (i + 1)) / ((i + 7) * (i + 3)))
Sum = Sum + S
End If
i = k + 1
If i <= j Then
S = ((i * (i + 1)) / ((i + 7) * (i + 3)))
Sum = Sum + S
End If
Cells(5, 5) = Sum
End Sub
Див. Додатки : D, E, G
Блок-схема
Додаток G
Завдання 2.2
1.Постановка завдання
в
залежності від
значення
у
класти
схему алгоритму i програму для
визначення значення функції :
W=
2.Формалізацію завдання в MS Word
Вхідні дані: y
Результат : w
Обмеження 0.5 <= y < 8 ; у<0.5 ; y=>8
3. Алгоритм розв'язування задачі (словесний) |
1. Ввести вхідні дані: y. |
2.Перевіряємо умову у>0.5 |
3.Якщо умова справджуєть обчислюємо функцію за формулою w=y+sin(y) |
4.Якщо попередня умова не справджується то потрібно перевірити другу умову. |
5.Якщо умова справджується обчислюємо функцію за формулою w=(y+sqr(y)^3) |
6. Перевіряємо чи у не перивищує або дорівнює значенню 8 |
7.Виводимо значення W.
Див. Додатки : F, G |
ВИСНОВКИ
Виконавши дану розрахункову роботу, я переконався у доцільності використання офісного програмування та на практиці відчув усі його переваги. Поглибив свої знанння у цій галузі та виробивши практичні навички роботи з Visual Basic. Також я виключив певні типові помилки та усунув недоліки у роботі з мовою VBA. Освоїв базові знання з мови VBA. Вивчив оператори, способи введення та виведення інформації у VBA, освоїв базові вміння опису змінних та відмінності у введенні формул у MS Exel і VBA. Дізнався про види циклів (ітераційний, арифметичний) навчився їх розпізнавати і користуватися ними у своїй діяльності. Також ознайомився з вимогами до оформлення форм у VBA.
Я ще раз переконався у доцільності автоматизації праці офісних працівників і після вивчення основ мови програмування VBA, я з впевненістю можу сказати, що в недалекому майбутньому я стану кваліфікованим співробітником. Який ефективніше працює завдяки знанням офісного програмування. І закликаю усіх звернути свою увагу на таку просту і легку в освоєнні мову програмування як Visual Basic for Application, для самостійного освоєння цієї мови програмування краще за все буде використання книг з усіма аспектами у роботі з VBA також можна використати чисельні відео уроки які легко знайти в Інтернеті.
СПИСОК ВИКОРИСТАНИХ ДЖЕРЕЛ

Дудзяний І.М. Програмування мовою Visual Basik/VBA.- Видавничий центр ЛНУ імені Івана Франка, 2004. №1. С. 241. Режим доступу до книги :
http://ami.lnu.edu.ua/books/ami/VB_VBA.pdf.
Аналіз та обробка даних засобами Visual Basic: Електронний ресурс :
http://referaty.pp.ua/abstracts/ua/computers/computers_8296.php
Григорук П М - Візуальне об’єктне програмування: Електронний ресурс :
http://bookdn.com/book_210.html
ДОДАТКИ
Додаток А
Додаток В
Додаток С
Додаток D
Додаток E
Додаток F
Додаток G