9. Прослежено изменение дохода организатора пирамиды в определенный день Х, изменяя исходные данные. День X задан самостоятельно (50).
10. Полученные данные занесены в таблицу (таб. 1.5.2).
Таблица 1.5.2 – Результаты исследования
Изменяемый параметр | Увеличиваемый параметр | Уменьшаемый параметр | ||||
Значение | День Х | Доходы на день Х | Значение | День Х | Доходы на день Х | |
Исходное значение | 735,83 | 735,83 | ||||
M | 2000000 | 50 | 17961,56 | 600000 | 50 | 377,35 |
KA | 0,00000017 | 50 | 6446,68 | 0,00000006 | 50 | 377,35 |
R | 370 | 50 | 681,56 | 250 | 50 | 774,59 |
T | 55 | 50 | 735,83 | 45 | 50 | 733,93 |
S | 6% | 50 | 739,86 | 2,5% | 50 | 721,08 |
П1 | 100000 | 50 | 938,16 | 65000 | 50 | 702,11 |
SNK1 | 12 | 50 | 989,59 | 5 | 50 | 648,65 |
Процесс описывается дифференциальным уравнением.
Также найдены максимальный доход и день его достижения, минимальное значение первоначального капитала.
Цель работы: создать приложение в VBA, позволяющее определить и вывести в ячейки Excel количество лет, кварталов, месяцев, недель и дней, прошедших между двумя датами.
Ход работы:В ходе выполнения производственной практики было создано приложение в VBA, позволяющее посчитать количество лет, кварталов, месяцев, недель и дней, прошедшее между двумя заданными датами.
Текстпрограммы
Private Sub CommandButton1_Click()
d1 = DTPicker1.Value
d2 = DTPicker2.Value
TextBox1.Text = DateDiff("yyyy", d1, d2) / разность между двумя заданными годами
TextBox2.Text = DateDiff("m", d1, d2) / разность между двумя заданными месяцами
TextBox3.Text = DateDiff("q", d1, d2) / разность между двумя заданными кварталами
TextBox4.Text = DateDiff("d", d1, d2) / разность между двумя заданными днями
End Sub
Private Sub CommandButton2_Click()
UserForm1.Hide
End Sub
В результате проделанной работы получены теоретические и практические знания о возможностях программного продукта Exсel. Для выполнения практических задач были использованы разнообразные функции, которые позволяют быстро и оптимально получить решение.
Проделано следующее:
- Закрепление навыков составления итоговых таблиц, связывая данные из других источников;
- Использован MacroRecorder для записи простого макроса;
- Освоена технологии бизнес-анализа данных в Excel, используя функции пакета Анализ данных и некоторые статистические функции;
- С помощью встроенных функций Excel решены финансовые задачи;
- Знакомство с возможностями Диспетчера сценариев;
- С помощью сервисной программы Excel Поиск решения решены экономические задачи и проведен анализ решения типа «что-если».
1. Миньков С.Л. Excel: Лабораторный практикум. – Томск: Томский медвузовский центр дистанционного образования, 2000.
2. Гарнаев А.Ю. Использование MSExcel и VBA в экономике и финансах. – С-Пб.: БХВ – Санкт-Петербург, 1999.
3. Овчаренко Е.К., Ильина О.П, Балыбердин Е.В., Финансово- экономические расчеты в Excel. Изд. 3-е – М.: Филинъ, 1999.
4. Матвеев Л.А. Компьютерная поддержка решений.- С-Пб., Специальная литература, 1998.
5. Гусева О.Л. Миронова Н.Н. Excel для Windows. Практические работы// Информатика и образование.- 1996.- №2-6