1. Жуковский Г. И. Автоматизация бухгалтерского учета на ПЭВМ //Бухгалтеский учет - 1990 - №7 - с. 6
2. Афанасьєв М.В., Гончаров А.Б. Економіка підприємства: Навчально-методичний посібник для самостійного вивчення дисципліни /За редакцією проф.. М.В. Афанасьєва. –Х.: ВД “ІНЖЕК”, 2003. – 410 с.
3. Макаровська Т.П., Бондар Н.М., Економіка підприємства: Навч. посіб. для студ. вищ. навч. зал. – К.: МАУП, 2003. – 304с.
4. Мец В.О. Економічний аналіз фінансових результатів та фінансового стану підприємства: Навч. посіб. – К.: Вища шк.., 2003. – 278с.: іл..
Под редакцией А.В.Шегди, економіка підприємства: Навч. Посіб. –2-е вид., стер. – К.: Знання-Прес, 2002. – 335с.
6. Кейлер В.А. Экономика предприятия: Курс лекций. – М.: ИНФРА-М, Новосибирск: НГАЭиУ, 1999. – 132 с.
7. Скляренко В.К., Прудников В.М. Экономика предприятия: Конспект лекций. – М.: ИНФРА-М, 2001.–208 с.–(Серия «Высшее образование»).
8. Финансово-экономический анализ: Учебник./Бандурка А.М., Червяков И.М., Посылкина О.В. – Харьков: Ун-т внутр. дел, 1999.– 394с.
9. Экономика предприятия (фирмы): Учебник/Под ред. проф. О.И. Волкова и доц. О.В. Девяткина. – 3-е изд., перераб. и доп. – М.: ИНФРА-М, 2002. – 601с. – (Серия «Высшее образование»).
|
|
10. Экономический анализ: Учеб. / Г.В. Савицкая. – 10-е изд., испр. – М.: Новое знание, 2004. – 640с. – (Экономическое образование).
11. Дорош Н.І. Аудит: методологія і організація. – К.: Знания, 2001. – с.402.
12. Аудит: Учебник для вузов/ В.И.Подольский, Г.Б.Поляк, А.А.Савин – М.:ЮНИТИ – ДАНА, 2002. – 655с.
13. Анализ финансово-экономической деятельности предприятия: Учеб. пособие для вузов /Под ред. проф. Н.П. Любушина. – М.: ЮНИТИ-ДАНА, 2002. – 471с.
14. Ефимова О. В. Как анализировать финансовое положение предприятия. - М.: Интел-Синтез, 1994.
15. Завгородний В. П., Савченко В. Я. Бухгалтерский учет, контроль и аудит в условиях рынка - К.: Издательство «Блиц-Информ», 1995 - 832с.
16. Каданер П. А. Автоматизация современного делопроизводства и бухгалтерии. М.: Аллегро, 1997 – 208c.
17. Усач Б.Ф. Аудит: Навчальний посібник. - К.: Знания., 2002 - 223 с.
18. Шеремет А.Д., Суец В.П. Аудит: Учебник. – 2-е издание, дополнен и переработан – М.: ИНФРА – М, 2002. –352с.
19. Донцова Л.В., Никифорова Н.А. Годовая и квартальная бухгалтерская отчетность. М.: “Дело и Сервис”, 1999 – 203c.
20. Ефимова О.В. Финансовый анализ. М.: “Бухгалтерский учет”,1998 – 400c.
21. Ковалев В.В. Финансовый анализ. М.: “Финансы и статистика”, 2000 – 508c.
22. Ковалев В.В., Патров В.В. Как читать баланс. М.: “Финансы и статистика”,1998 – 503c.
23. Шеремет А.Д., Сайфулин Р.С. Финансы предприятий. М.: ИНФРА-М, 1999 – 606c.
24. Абрамов А. Е. Основы анализа финансовой, хозяйственной и инвестиционной деятельности предприятия в 2-х ч. М.: Экономика и финансы АКДИ, 1994-496c.
|
|
25. Балабанов И. Т. Финансовый менеджмент. - М.: Финансы и статистика, 1994-502c.
26. Баканов М. И. Шеремет А. Д. Теория экономического анализа. - М.: Финансы и статистика, 1994-602c.
27. Ветров А. А. Операционный аудит-анализ.-М.: Перспектива, 1996-401c.
28. Ефимова О. В. Финансовый анализ - М.: Бухгалтерский учет, 1996-356c.
29. Ковалева А. М. Финансы в управлении предприятием. - М.: Финансы и статистика, 1995-403c.
30. Моляков Д. С. Финансы предприятий отраслей народного хозяйства. - М.: Финансы и статистика, 1996.
31. Хеддевик К. Финансово-экономический анализ деятельности предприятий. - М.: Финансы и статистика, 1996-604c.
32. Шеремет А. Д., Суйц. Аудит - М.: Инфра-М, 1994-404c.
33. Дембинский Н.В. «Анализ экономики промышленного предприятия». Минск:Беларусь,1979-502c.
34. Каракоз И.И., СамборскВ.И. «Теория экономического анализа». К.: Выща школа,1989-567с.
35. Кравченко Л.И. «Анализ финансового состояния предприятия». Минск: ПКФ «Экаунт», 1994-498с.
36. Панков Д.А. «Современные методы анализа финансового по-ложения» Минск: ООО «Профит»,1995-501с.
37. Муравьев А.И. «Теория экономического анализа: проблемы и решения». М: Финансы и статистика,1988-468с.
38. Балабонов И.Т. «Анализ и планирование финансов хозяйству-ющего субъекта». М.: Финансы и статистика, 1994-682с.
39. Анализ хозяйственной деятельности в промышленности. Под ред. В.И. Стражева. Минск: Вышэйшая школа,1995-498с.
40. Маркин Ю.П. «Анализ внутрихозяйственных резервов». М: Финансы и статистика,1991-506с.
Приложение А
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids;
type
TForm1 = class(TForm)
tabl1: TStringGrid;
tabl2: TStringGrid;
Button1: TButton;
tabl: TStringGrid;
tabl3: TStringGrid;
Label1: TLabel;
procedure FormActivate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormActivate(Sender: TObject);
begin
{Пассив}
tabl1.Cells[0,0]:='Пассив';
tabl1.Cells[1,0]:='На начало года';
tabl1.Cells[2,0]:='На конец года';
tabl1.cells [0,1]:='Уставный капитал';
tabl1.cells [0,2]:='Паевый капитал';
tabl1.cells [0,3]:='Дополнительный вложенный капитал';
tabl1.cells [0,4]:='Другой дополнительный капитал';
tabl1.cells [0,5]:='Резервный капитал';
tabl1.cells [0,6]:='Нераспределенная прибыль (непокрытый убыток)';
tabl1.cells [0,7]:='Неоплаченный капитал';
tabl1.cells [0,8]:='Изъятый капитал';
tabl1.cells [0,9]:='Всего по разделу I';
tabl1.cells [0,10]:='Обеспечение выплат персоналу';
tabl1.cells [0,11]:='Другие обеспечения';
tabl1.cells [0,12]:='Целевое финансирование';
tabl1.cells [0,13]:='Всего по разделу II';
tabl1.cells [0,14]:='Долгосрочные кредиты банка';
tabl1.cells [0,15]:='Другие долгосрочные финансовые обязательства';
tabl1.cells [0,16]:='Отсроченные налоговые обязательства';
tabl1.cells [0,17]:='Другие долгосрочные обязательства';
tabl1.cells [0,18]:='Всего по разделу III';
tabl1.cells [0,19]:='Краткосрочные кредиты банка';
tabl1.cells [0,20]:='Текущая задолженность по долгосрочным обязательствам';
tabl1.cells [0,21]:='Векселя выданные';
tabl1.cells [0,22]:='Кредиторская задолженность за товары, работы, услуги';
tabl1.cells [0,23]:='Текущие обязательства по счетам:';
tabl1.cells [0,24]:='с полученных авансов';
tabl1.cells [0,25]:='с бюджетом';
tabl1.cells [0,26]:='с позабюджетных платежей';
tabl1.cells [0,27]:='по страхованию';
tabl1.cells [0,28]:='по оплате труда';
tabl1.cells [0,29]:='с участниками';
tabl1.cells [0,30]:='по внутренним счетам';
tabl1.cells [0,31]:='Другие текущие обязательства';
tabl1.cells [0,32]:='Всего по разделу IV';
tabl1.cells [0,33]:='Доходы будущих периодов';
tabl1.cells [0,34]:='Баланс';
{Актив}
tabl.Cells[0,0]:='Актив';
tabl.Cells[1,0]:='На начало года';
tabl.Cells[2,0]:='На конец года';
tabl.cells [0,1]:='Нематериальные активы:';
tabl.cells [0,2]:='остаточная стоимость';
tabl.cells [0,3]:='первоначальная стоимость';
tabl.cells [0,4]:='износ';
tabl.cells [0,5]:='Незавершенное строительство';
tabl.cells [0,6]:='Основные средства:';
tabl.cells [0,7]:='остаточная стоимость';
tabl.cells [0,8]:='первоначальная стоимость';
tabl.cells [0,9]:='износ';
tabl.cells [0,10]:='Долгосрочные финансовые инвестиции:';
tabl.cells [0,11]:='Долгосрочная дебиторская задолженность';
tabl.cells [0,12]:='Отсроченные налоговые активы';
|
|
tabl.cells [0,13]:='Другие необоротные активы';
tabl.cells [0,14]:='Всего по разделу I';
tabl.cells [0,15]:='Запасы';
tabl.cells [0,16]:='производственные запасы';
tabl.cells [0,17]:='животные на выращивании и откорме';
tabl.cells [0,18]:='незавершенное производство';
tabl.cells [0,19]:='готовая продукция';
tabl.cells [0,20]:='товары';
tabl.cells [0,21]:='Векселя полученные';
tabl.cells [0,22]:='Дебиторская задолженность за товары, работы, услуги:';
tabl.cells [0,23]:='чистая реализационная стоимость';
tabl.cells [0,24]:='первоначальная стоимость';
tabl.cells [0,25]:='резерв сомнительных долгов';
tabl.cells [0,26]:='Дебиторская задолженность по расчетам:';
tabl.cells [0,27]:='с бюджетом';
tabl.cells [0,28]:='по выданным авансам';
tabl.cells [0,29]:='по начисленным доходов';
tabl.cells [0,30]:='по внутреннимрасчетам';
tabl.cells [0,31]:='Другая текущая дебиторская задолженность';
tabl.cells [0,32]:='Текущие финансовые инвестиции';
tabl.cells [0,33]:='Денежные средства и их эквиваленты:';
tabl.cells [0,34]:='в национальной валюте';
tabl.cells [0,35]:='в иностранной валюте';
tabl.cells [0,36]:='Другие оборотные активы';
tabl.cells [0,37]:='Всего по разделу II';
tabl.cells [0,38]:='Расходы будущих периодов';
tabl.cells [0,39]:='Баланс';
{фин результаты}
tabl3.cells[0,0]:='Показатель';
tabl3.Cells[1,0]:='За отчетный год';
tabl3.cells[0,1]:='Финансовые результаты от обычной деятельности до налогообложения';
tabl3.cells[0,2]:='Чистая прибыль (убыток)';
tabl3.cells[0,3]:='Валовая прибыль (убыток)';
tabl3.cells[0,4]:='Чистый доход от реализации продукции';
tabl3.cells[0,5]:='Финансовые результаты от операционной деятельности';
{Результаты расчета}
tabl2.cells[0,0]:='Финансовые показатели';
tabl2.Cells[1,0]:='На начало года';
tabl2.Cells[2,0]:='На конец года';
tabl2.cells[0,1]:='Коэф-т фин. автономии';
tabl2.cells[0,2]:='Коэф-т зависимости';
tabl2.cells[0,3]:='Коэф-т фин. риска';
tabl2.cells[0,4]:='Коэф-т маневренности';
tabl2.cells[0,5]:='Коэф-т общ. ликвидности';
tabl2.cells[0,6]:='Коэф-т срочной ликвидности';
tabl2.cells[0,7]:='Коэф-т абсолютной ликвидности';
tabl2.cells[0,8]:='Рентабельность совокупного капитала';
tabl2.cells[0,9]:='Рентабельность собственного капитала';
tabl2.cells[0,10]:='Валовая рентабельность продаж';
tabl2.cells[0,11]:='Операционная рентабельность продаж';
tabl2.cells[0,12]:='Чистая рентабельность продаж';
|
|
end;
procedure TForm1.Button1Click(Sender: TObject);
var
Ka,Kz,Kr,Km,Kol,Ksl,Kal,P1,P2,P3,P4,P5:real;
Kak,Kzk,Krk,Kmk,Kolk,Kslk,Kalk:real;
begin
Ka:=strtofloat(tabl1.Cells[1,9])/
strtofloat(tabl1.cells[1,34]);{коэф-т фин автономии}
Kz:=strtofloat(tabl1.Cells[1,34])/
strtofloat(tabl1.cells[1,9]);{коэф-т зависимости}
Kr:=(strtofloat(tabl1.Cells[1,13])+
strtofloat(tabl1.Cells[1,18])+
strtofloat(tabl1.Cells[1,32])+strtofloat(tabl1.cells[1,33]))/
strtofloat(tabl1.cells[1,9]);{коэф-т фин риска}
Km:=(strtofloat(tabl1.Cells[1,7])-
strtofloat(tabl.Cells[1,14]))/
strtofloat(tabl1.cells[1,9]);{коэф-т маневренности}
Kol:=(strtofloat(tabl.cells[1,39])-
strtofloat(tabl.cells[1,14]))
/(strtofloat(tabl1.Cells[1,32])+strtofloat(tabl1.Cells[1,13])+
strtofloat(tabl1.Cells[1,33]));{коэф-т общ ликвидности}
Ksl:=(strtofloat(tabl.Cells[1,37])-
strtofloat(tabl.Cells[1,16])-strtofloat(tabl.Cells[1,17])
-strtofloat(tabl.Cells[1,18])-strtofloat(tabl.Cells[1,36]))
/(strtofloat(tabl1.Cells[1,32])+strtofloat(tabl1.Cells[1,13])+
strtofloat(tabl1.Cells[1,33]));{коэф-т срочной ликвидности}
Kal:=(strtofloat(tabl.Cells[1,32])+
strtofloat(tabl.Cells[1,34])+strtofloat(tabl.Cells[1,35]))
/(strtofloat(tabl1.Cells[1,32])+strtofloat(tabl1.Cells[1,13])+
strtofloat(tabl1.Cells[1,33]));{коэф-т абсолютной ликвидности}
P1:=strtofloat(tabl3.cells[1,1])/
strtofloat(tabl1.cells[2,34]);{рентабельность совокупного капитала}
P2:=strtofloat(tabl3.cells[1,2])/
strtofloat(tabl1.cells[2,9]);{рентабельность собственного капитала}
P3:=strtofloat(tabl3.cells[1,3])/
strtofloat(tabl3.cells[1,4]);{валовая рентабельность продаж}
P4:=strtofloat(tabl3.cells[1,5])/
strtofloat(tabl3.cells[1,4]);{операционная рентабельность продаж}
P5:=strtofloat(tabl3.cells[1,2])/
strtofloat(tabl3.cells[1,4]);{чистая рентабельность продаж}
Kak:=strtofloat(tabl1.Cells[2,9])/
strtofloat(tabl1.cells[2,34]);{коэф-т фин автономии}
Kzk:=strtofloat(tabl1.Cells[2,34])/
strtofloat(tabl1.cells[2,9]);{коэф-т зависимости}
Krk:=(strtofloat(tabl1.Cells[2,13])+
strtofloat(tabl1.Cells[2,18])+
strtofloat(tabl1.Cells[2,32])+strtofloat(tabl1.cells[2,33]))/
strtofloat(tabl1.cells[2,9]);{коэф-т фин риска}
Kmk:=(strtofloat(tabl1.Cells[2,7])-
strtofloat(tabl.Cells[2,14]))/
strtofloat(tabl1.cells[2,9]);{коэф-т маневренности}
Kolk:=(strtofloat(tabl.cells[2,39])-
strtofloat(tabl.cells[2,14]))
/(strtofloat(tabl1.Cells[2,32])+strtofloat(tabl1.Cells[2,13])+
strtofloat(tabl1.Cells[2,33]));{коэф-т общ ликвидности}
Kslk:=(strtofloat(tabl.Cells[2,37])-
strtofloat(tabl.Cells[2,16])-strtofloat(tabl.Cells[2,17])
-strtofloat(tabl.Cells[2,18])-strtofloat(tabl.Cells[2,36]))
/(strtofloat(tabl1.Cells[2,32])+strtofloat(tabl1.Cells[2,13])+
strtofloat(tabl1.Cells[2,33]));{коэф-т срочной ликвидности}
Kalk:=(strtofloat(tabl.Cells[2,32])+
strtofloat(tabl.Cells[2,34])+strtofloat(tabl.Cells[2,35]))
/(strtofloat(tabl1.Cells[2,32])+strtofloat(tabl1.Cells[2,13])+
strtofloat(tabl1.Cells[2,33]));{коэф-т абсолютной ликвидности}
{Вывод результатов}
tabl2.Cells[1,1]:=floattostrf(Ka,ffgeneral,4,0);{коэф-т фин автономии}
tabl2.Cells[1,2]:=floattostrf(Kz,ffgeneral,4,0);{коэф-т зависимости}
tabl2.Cells[1,3]:=floattostrf(Kr,ffgeneral,4,0);{коэф-т фин риска}
tabl2.Cells[1,4]:=floattostrf(Km,ffgeneral,4,0);{коэф-т маневренности}
tabl2.cells[1,5]:=floattostrf(Kol,ffgeneral,4,0);{коэф-т общ ликвидности}
tabl2.Cells[1,6]:=floattostrf(Ksl,ffgeneral,4,0);{коэф-т срочной ликвидности}
tabl2.cells[1,7]:=floattostrf(Kal,ffgeneral,4,0);{коэф-т абсолютной ликвидности}
tabl2.Cells[1,8]:=floattostrf(P1,ffgeneral,4,0);{рентабельность совокупного капитала}
tabl2.Cells[1,9]:=floattostrf(P2,ffgeneral,4,0);{рентабельность собственного капитала}
tabl2.Cells[1,10]:=floattostrf(P3,ffgeneral,4,0);{валовая рентабельность продаж}
tabl2.Cells[1,11]:=floattostrf(P4,ffgeneral,4,0);{операционная рентабельность продаж}
tabl2.Cells[1,12]:=floattostrf(P5,ffgeneral,4,0);{чистая рентабельность продаж}
tabl2.Cells[2,1]:=floattostrf(Kak,ffgeneral,4,0);{коэф-т фин автономии}
tabl2.Cells[2,2]:=floattostrf(Kzk,ffgeneral,4,0);{коэф-т зависимости}
tabl2.Cells[2,3]:=floattostrf(Krk,ffgeneral,4,0);{коэф-т фин риска}
tabl2.Cells[2,4]:=floattostrf(Kmk,ffgeneral,4,0);{коэф-т маневренности}
tabl2.cells[2,5]:=floattostrf(Kolk,ffgeneral,4,0);{коэф-т общ ликвидности}
tabl2.Cells[2,6]:=floattostrf(Kslk,ffgeneral,4,0);{коэф-т срочной ликвидности}
tabl2.cells[2,7]:=floattostrf(Kalk,ffgeneral,4,0);{коэф-т абсолютной ликвидности}
end;
end.