Расчет финансового левериджа
Министерство торговли Российской Федерации
Московский государственный университет
коммерции
Краснодарский филиал
Факультет УФФ
Курс 1-ый
Группа 0212
Курсовая работа
по курсу:”Информатика и вычислительная
техника”
на тему:”Расчет финансового левериджа”
Выполнил :
Студентка
Торичнева Н.А.
Руководитель :
Ст.преподаватель
Николаева И.В.
Курсовая работа защищена
“____”________1999 г.
Оценка _________
Краснодар 1999 г.
СОДЕРЖАНИЕ
Введение.......................................................................3
1.Задание на выполнение курсовой работы ..........4
2.Анализ проблемы ...................................................5
3. Разработка интерфейса пользователя ............6
4. Список идентификаторов ..................................7
5. Схема алгоритма ..................................................8
6. Текст программы ..................................................9
7. Результат выполнения программы на
компьютере ...........................................................14
8. Тестовая задача ....................................................15
9. Сравнительный анализ результата выполнения
задачи на компьютере и тестовой задачи ......15
10. Руководство пользователя ...............................16
Заключение................................................................17
Литература..............................................................18
Введение.
Использование ЭВМ позволяет облегчить работу с информацией представителям самых разных профессий. Существуют готовые многоцелевые программные продукты для различных видов работ - текстовые редакторы, базы данных, электронные таблицы и т.д. Но иногда удобнее составить небольшую программу решения конкретных задач. Для этого можно использовать различные языки программирования - Паскаль, Си, FoxPro и другие. Язык Visual Basic и ему подобные удобен для таких целей, т.к. имеет очень удобный интерфейс и при минимальном затрате времени позволяет получить хороший результат. На примере предложенного задания рассмотрим применение этого языка для решения задачи.
Задание.
Расчет финансового левериджа.
Разработать циклическую схему алгоритма и программу с защитой от неправильного ввода исходных данных для расчета финансового левериджа.
Финансовый леверидж является показателем финансовой устойчивости акционерного общества и определяется соотношением :
О+А>1>
Л = ------------
А>2>
Где Л - уровень левериджа;
О - облигации, руб;
А>1> - привелегерованные акции, руб;
А>2> - обыкновенные акции, руб.
Разработать и решить контрольный пример расчета финансового левериджа для каждого из 8 акционерных обществ и среднего значения левериджа.
Анализ проблемы.
При покупки акций и облигаций одного акционерного общества инвестору следует исходить из принципа финансового левериджа.
Финансовый леверидж (англ. Leverage - средство для достижения цели ) представляет собой соотношение между облигациями и привелегированными акциями с одной стороны, и обыкновенными акциями с другой.
О+А>1>
Л = ------------
А>2>
Где Л - уровень левериджа; О - облигации, руб; А>1> - привелегерованные акции, руб; А>2> - обыкновенные акции, руб.
Финансовый леверидж является показателем финансовой устойчивости акционерного общества, что отражается и на доходности портфельных инвестиций. Высокий уровень левериджа - явление опасное, так как ведет к финансовой неустойчивости.
Пример : Акционерное общество выпустило 10%-ные облигации на сумму 10.000.000 рублей, привелегированные акции на сумму 2.000.000 рублей, с фиксированным дивидендом 40% и обыкновенные акции на сумму 20.000.000 рублей, то есть акции общества имеют высокий уровень левериджа
10+2
Л = ---------- = 0,6
20
Прибыль общества к распределению составляет 2.200.000 рублей ее распределяют следующим образом : на уплату процентов по облигациям - 1.000.000 рублей, на дивиденды по привелегированным акциям - 800.000 рублей, на дивиденды по обыкновенным акциям - 400.000 рублей. Если прибыл снизится до 1.100.000 рублей, то акционерное общество не только “съест” то, что предназначалось на выплату дивидендов по обыкновенным акциям, но и не сможет за счет прибыли выплатить дивиденды по привелегированным акциям. В этом заключается опасность акций с высоким уровнем левериджа и проявляется основная слабость тех обществ у которых имеется большая сумма долга в виде облигаций и привелегированных акций. Осторожные инвесторы обычно избегают покупки таких ценных бумаг.
Список идентификаторов.
kol - количество обсчитанных акционерных обществ (Integer).
summa - сумма финансового левериджа всех обсчитанных АО (Single).
pr_ak - цена привелегированных акций текущего АО (Currency).
ob_ak - цена обыкновенных акций текущего АО (Currency).
obl - цена облигаций текущего АО (Currency).
lev - значение финансового левериджа текущего АО (Currency).
t1,t2 - промежуточные переменные (String).
Таблица свойств формы.
Begin Form FIN_LEV
Caption = "Расчет финансового левериджа"
ClientHeight = 4560
ClientLeft = 1410
ClientTop = 1995
ClientWidth = 7305
Height = 4965
Icon = (Icon)
Left = 1350
LinkTopic = "Form1"
ScaleHeight = 304
ScaleMode = 3 'Pixel
ScaleWidth = 487
Top = 1650
Width = 7425
Begin CommandButton EXT
Caption = "ВЫХОД"
Height = 495
Left = 5040
TabIndex = 7
Top = 3960
Width = 1455
End
Begin CommandButton calc
Caption = "РАСЧЕТ"
Height = 495
Left = 720
TabIndex = 6
Top = 3960
Width = 1455
End
Begin TextBox V_OB_AK
Height = 375
Left = 3240
TabIndex = 5
Text = "0"
Top = 2400
Width = 2295
End
Begin TextBox V_PR_AK
Height = 375
Left = 3240
TabIndex = 4
Text = "0"
Top = 1560
Width = 2295
End
Begin TextBox V_obl
Height = 375
Left = 3240
TabIndex = 1
Text = "0"
Top = 720
Width = 2295
End
Begin Label srd_lev
BorderStyle = 1 'Fixed Single
Caption = "Средний финансовый леверидж пока не вычислен"
Height = 255
Left = 120
TabIndex = 10
Top = 3480
Width = 6975
End
Begin Label Titul
Caption = "Расчет 1"
FontBold = -1 'True
FontItalic = 0 'False
FontName = "MS Sans Serif"
FontSize = 13.5
FontStrikethru = 0 'False
FontUnderline = 0 'False
Height = 375
Left = 2520
TabIndex = 9
Top = 120
Width = 2295
End
Begin Label vivod
BorderStyle = 1 'Fixed Single
Caption = "Финансовый леверидж пока не вычислен"
Height = 255
Left = 120
TabIndex = 8
Top = 3000
Width = 6975
End
Begin Label T_OB_AK
Caption = "Введите обыкновенные акции , руб"
Height = 495
Left = 120
TabIndex = 3
Top = 2400
Width = 2895
End
Begin Label T_PR_AK
Caption = "Введите привелегированные акции , руб"
Height = 495
Left = 120
TabIndex = 2
Top = 1560
Width = 2895
End
Begin Label T_obl
Caption = "Введите облигации , руб"
Height = 255
Left = 120
TabIndex = 0
Top = 840
Width = 2895
End
End
Текст программы.
Module fin_lev.bas
Global kol As Integer
Global summa As Single
End Module
sub> calc_Click ()
If Val(v_obl.Text) < 0 Then
MsgBox "Не все введено"
Exit sub>
End If
If Val(v_pr_ak.Text) < 0 Then
MsgBox "Не все введено"
Exit sub>
End If
If Val(v_ob_ak.Text) <= 0 Then
MsgBox "Неверные данные"
Exit sub>
End If
obl = Val(v_obl.Text)
pr_ak = Val(v_pr_ak.Text)
ob_ak = Val(v_ob_ak.Text)
lev = (obl + pr_ak) / ob_ak
kol = kol + 1
t1 = "Финансовый леверидж предприятия №"
vivod.Caption = t1 + Str(kol) + " равен " + Mid$(Str(lev), 1, 10)
summa = summa + lev
t1 = "Среднее значение левериджа "
t2 = " предприятий равно "
srd_lev.Caption = t1 + Str(kol) + t2 + Str(summa / kol)
titul.Caption = "Расчет #" + Str(kol + 1)
v_pr_ak.Text = "0"
v_obl.Text = "0"
v_ob_ak.Text = "0"
End sub>
sub> EXT_Click ()
End
End sub>
sub> Form_Load ()
kol = 0
summa = 0
End sub>
sub> V_OB_AK_Change ()
If Val(v_ob_ak.Text) < 0 Then
MsgBox "Требуется ввести положительное число"
v_ob_ak.Text = "0"
End If
End sub>
sub> V_obl_Change ()
If Val(v_obl.Text) < 0 Then
MsgBox "Требуется ввести положительное число"
v_obl.Text = "0"
End If
End sub>
sub> V_PR_AK_Change ()
If Val(v_pr_ak.Text) < 0 Then
MsgBox "Требуется ввести положительное число"
v_pr_ak.Text = "0"
End If
End sub>
Тестовая задача.
Рассчитать финансовый леверидж для данной группы из 8 акционерных обществ, а также рассчитать среднее значение левериджа для этих предприятий.
|
Облигации (млн.руб) |
Привелегированные акции(млн.руб) |
Обыкновенные акции(млн.руб) |
|
|
1 2 3 4 5 6 7 8 |
10 14 18 14 9 0 0.8 0.3 |
2 8 4 0 12 7 0.4 0.5 |
20 31 22 18 60 3.5 2.1 1.3 |
Сравнительный анализ результата выполнения на компьютере и тестовой задачи.
|
Значение левериджа полученное на Компьютере |
Значение левериджа полученное на калькуляторе |
|
|
1 2 3 4 5 6 7 8 |
0.600 0.710 1.000 0.778 0.350 2.000 0.571 0.615 |
0.600 0.710 1.000 0.778 0.350 2.000 0.571 0.615 |
|
среднее значение |
0.828 |
0.828 |
Руководство пользователя.
После запуска программы на экране появляется пустая форма. Пользователю необходимо ввести данные для первого акционерного общества ( в любом порядке) - стоимость выпущенных облигаций, привелегированных акций и обыкновенных акций. Стоимость облигаций и привелегированных акций может быть любым не отрицательным числом, стоимость обыкновенных акций должна быть положительным числом.
После ввода данных нажать кнопку РАСЧЕТ и если данные введены правильно, то производится вычисление финансового левериджа для данного акционерного общества. После вычисления происходит очистка полей ввода для ввода следующих данных. Пока кнопка РАСЧЕТ не нажата можно изменять значение вводимых данных.
При нажатии кнопки РАСЧЕТ производится вычисление среднего значения финансового левериджа для введенных уже акционерных обществ.
Если нужно вычислить среднее значение финансового левериджа для другой группы акционерных обществ, то необходимо выйти из программы ( нажав кнопку ВЫХОД) и запустить программу снова. Значение левериджа и среднего левериджа вычисляется с точностью до 10 знаков.
Заключение.
Применение ЭВМ во многих видах деятельности уже сейчас позволяет существенно упростить работу людей по подготовке, накоплению и переработке информации, проведению проектных работ и научных исследований. Электронно-вычислительные машины уже есть в школах, и они будут помогать при изучении физики и математики, химии и биологии и многих других учебных предметов.
Умение общаться с ЭВМ и использовать их в своей работе, так же как умение пользоваться ручкой в ближайшие 10-15 лет станет необходимым практически для всех взрослых и детей и составит основу компьютерной грамотности1.
Умение эффективно использовать ЭВМ в работе предполагает определенную культуру. Она включает в себя знание основных возможностей ЭВМ; умение четко ставить задачи, составлять планы их решения и записывать их в форме, понятной ЭВМ; умение выделять данные для решения задач и анализировать получаемые результаты. Эта культура опирается на знание законов логики и информатики.
Литература.
1. Маркова “Информатика”.
2. Маркус Линке “Visual Basic 5.0 справочник” - перевод с немецкого издательство “Бином”.
3.Зельднер Г.А. “Quick Basic для носорога” - Омск 1994 год
4. Microsoft Visual Basic Шаг за шагом/
5. Балабанов И.Т. “Основы финансового менеджмента”.
1 Компьютерная грамотность - это умение читать и писать, считать и рисовать, а так же искать информацию, применяя ЭВМ.
6
Разработка интерфейса пользователя.
Результат выполнения программы на компьютере.
