Са.об. = К а.об.* На.об. = 13237* 0,115 = 1522 грн
Са = 725,8+1522 = 2248 грн
г) годовые затраты на текущий ремонт здания и оборудования;
Ст.рем.=Ст.рем.зд.+ Ст.зем.об., где
Ст.рем.зд., Ст.зем.об – годовые расходы на текущий ремонт здания и оборудования соответственно,
Ст. рем =К * Нтек.рем. = 39160* 0,055 = 2154 грн;
д) расходы по охране труда принимаем в размере 100 грн на одного человека соответственно они составят 200 грн;
е) расходы на содержание здания и оборудования в чистоте, отопление освещение принимаем в размере 1,5% от капитальных вложений Сс.д.=39160*0,015=587 грн.;
ж) расходы на рационализацию и изобретение принимаем в размере 250 грн. на одного работника в год. Итого они составят 500 грн.;
з) расходы на малоценный и быстроизнашивающийся инвентарь принимаем в размере 0,2% от стоимости оборудования
Синв. = 13237 * 0,002=30 грн.;
и) прочие расходы принимаем 0,5% от суммы предшествующих статей расходов:
Спр.=30 грн.
Результаты расчета цеховых расходов сводим в таблицу
| № п/п | Статья расходов | Суммы, грн. |
| 1 | Заработная плата | 3386 |
| 2 | Отчисления по заработной плате | 1654 |
| 3 | Годовые амортизационные отчисления | 2248 |
| 4 | Годовые расходы на текущий ремонт | 2154 |
| 5 | Расходы по охране труда | 200 |
| 6 | Расходы на содержание здания и оборудования | 587 |
| 7 | Расходы на рационализацию | 500 |
| 8 | Расходы на малоценный и быстроизнашивыющийся инвентарь | 30 |
| 9 | Прочие расходы | 53,8 |
| Итого | 10812,8 |
Калькуляция себестоимости
| № п/п | Статья расходов | Сумма, грн. |
| 1 | Вспомогательные материалы | 2256 |
| 2 | Электроенергия | 2648,6 |
| 3 | Вода | 1040 |
| 4 | Зарплата производственных рабочих | 2138,4 |
| 5 | Отчисления по заработной плате | 1047,8 |
| 6 | Цеховые расходы | 10812,8 |
| Итого | 19942,2 |
Себестоимость 1000 кДж холода составит:
Схол 19942,2
С1000= ¾¾¾¾*103= ¾¾¾¾¾*103=0,080 грн.
Qг 2,5*108
Суммарные издержки по эксплуатации модуля включают в себя:
1) Затраты на производство холода;
2) Естественную убыль продукта при хранении;
3) Затраты на электроенергию потребляемую двигателями воздухоохладителей;
4) затраты на амортизацию и текущий ремонт – учтены ранее;
5) Прочие расходы – 1% от суммы вышеперечисленных затрат.
Расходы на электроенергию составят:
Зэл.’=n *N *t *T, где
n – Число двигателей воздухоохладителей;
N – потребляемая мощность, кВт;
t – число работы двигателей в сутки;
T – число рабочих дней в году;
Зэл.’ = 4 * 3,5 *10 *300 * 0,12 = 5040 грн.
Затраты на естественную убыль определим исходя из полной загрузки модуля контейнерами с яблоками. Количество заложенных на хранение яблок составит 92 т. Норма естестественной убыли за месяц хранения (со II декады октября по середину марта) составят 3,2%. В стоимостном выражении это будет:
С е. уб.= 92* 0,032 *260 =736 грн.
Суммарные издержки равны:
U = 19942 + 736 + 5040 + 250 = 25968 грн.
Предпологаемую прибыль за год определим по формуле:
П год = В – U – С зак, где
В-выручка от реализации яблок, грн;
U – годовые издержки по модулю, грн;
С зак – цена закупленных для длительного хранения, грн.
В = (V загр. – e) *Среал., где
e – естественная убыль яблок засрок храненя, т;
V загр. – количество заложенных на храненя яблок, т;
Среал – реализационная цена 1т яблок, принимаем 800 грн/т.
В = (92 – 2,9) *800 = 71280 грн.
П год = 71280 – 25968 – 23000 = 22312 грн
Срое окупаемости капитальных затрат составит:
Т = К/П= 39160 / 22312 » 1,7 года
Коэффициент рентабельности
Кр = 1/Т = 0,6
Исходя из технико – экономических показателей внедрения модуля является выгодным мереприятием.
Оринтировочно предпологаемая прибыль за год составит 22000 грн. Срок окупаемости модуля составит 1,7 лет, а коэффициент рентабельности равняется 0,6
| Показатель | Холодильник | Предыдущий вариант | Внедряемый вариант |
| Средние потери за сезон хранения, % | 6 – 8 | 4 – 6 | 4,8 – 6,4 |
| Срок храненияпродукции | ограничен | особенностью | |
| Уровень механизации погрузочно – разгрузочных работ, % | 90 – 100 | ||
| Капитальные вложения грн/т | 600 – 800 | 1000–1400 | 400 – 460 |
| Энергозатраты, грн / т | 30 – 40 | 50 – 60 | 20 – 30 |
| Продолжитель-ность стороительства, монтажа, лет | 2,5 – 3,5 | 1,2 – 1,8 | 0,6 |
| Прибыль, грн / тСредняя цена закупки – 600 грн/т | 180 – 230 | 260 – 280 | 230 – 260 |
Выводы
В результате произведенного проектирования была создана система автоматического регулирования фруктов в фруктохранилище.
При проектировании автоматики был сделан акцент на использование отечественных комплектующих, что окажет положительный эффект на народнохозяйственный комплекс.
Расчеты переходных процессов в холодильной камере показали, что система автоматического контроля поддерживает температуру в камере в заданном диапазоне несмотря на колебания температуры внешней среды.
Был произведен технико-экономический расчет, в результате которого был получен положительный экономический эффект.
Суммируя вышеизложенное можно сделать вывод о целесообразности внедрения и применения холодильного модуля.
Список использованной литературы
1 Крылов Н.В., Гришин Л.М. Экономика холодильной промышленности. М., Агропромиздат, 1987, 272 с.;
2 Холодильная техника. 1986, №11, с. 2 -4;
3 Оценка и совершенствование условий холодильного хранения овощей. Янковский и др., Сборник трудов ЛТИХП. Холодильная обработка и хранение пищевых пордуктов. Л., 1974, вып. 2, с. 125–132;
4 Комаров Н.С. Холод. М., Госиздат Министерства легкой и пищевой промышленности, 1953, 704 с.;
5 Теплообменные аппараты, приборы автоматизации и испытания холодильных машин. Справочник. М., Легкая и пищевая промышленность, 1984, 245 с.;
6 Ужанский В.С. Автоматизация холодильных машин и установок. М., Пищевая промышленность, 1973, 296 с.
7 Приднiпровський науковий вiсник. 1998 №12 (79).с 32 – 34.
8 Справочник по специальным функциям / Пер. с англ.; Под ред. М. Абромовица и И. Стиган. – М.; Наука, 1979
Приложение
Исходный текст программы modul
program modul;
uses crt, graph;
const max=5000; {числоточек}
h=0.04; {шагинтегрирования}
type work=object
t, tv: array [0..max] of real; {t‑температура, tv – скорость
роста температуры}
t1:real; {постоянная времени}
t2:real; {постоянная времени}
tur:real; {установившаяся температура при ее росте}
tus:real; {установившаяся температура при ее снижении}
maximum, minimum:real; {фактический диапазон регулирования}
period:real; {период колебаний}
File_name:string; {Имя файла данных}
constructor Init; {инициализация параметров}
procedure save; {запись данных в файл}
procedure count; {расчет переходного процесса методом Рунге-Кутта}
procedure setka_par;
procedure show; {показграфика}
procedure obrob; {обработка результатов расчета}
function f (y, ys, tvar:real):real;
end;
constructor work.init;
var i:integer;
begin
for i:=0 to max do
begin
tv[i]:=0;
t[i]:=0;
end;
clrscr;
write ('Введите постоянную времени Т1=');
readln(t1);
write ('Введите постоянную времени Т2=');
readln(t2);
write ('Введите начальную температуру в камере t0=');
readln (t[0]);
write ('Ввести установившеюся температуру при ее росте ');
readln(tur);
write ('Ввести установившеюся температуру при ее снижении ');
readln(tus);
write ('Имяфайладанных ');
readln (File_name)
end;
procedure work.save;
var file1:text;
i:integer;
begin
assign (file1, File_name);
rewrite (file1);
writeln (file1,'Исследование двухпозиционной системы регулирования');
writeln (file1,'температуры в холодильной камере');
writeln (file1,'Исходные данные');
writeln (file1,'постоянные времени Т1=', t1,' T2= ', t2);
writeln (file1,'заданный диапазон 0.5–1 градус цельсия');
writeln (file1,'полученный диапазон ', minimum:6:3,'-', maximum:6:3, 'градус цельсия');
writeln (file1,'период колебаний ', period:4:2,' часа');
for i:= 0 to max do
if (i mod 50)=0 then {сохраняется
каждое 50‑езначение}
begin write (file1, (i*h):6:4);
write (file1, tv[i]:10:5);
writeln (file1, t[i]:10:5);
end;
close(file1);
end;
procedure work.count;
var
k1, k2, k3, k4:real;
i: integer;
tvar1:real;
rost:boolean; {флагсостоянияработыкомпрессоров (при rost=false)
компрессорыработаютинаоборот}
begin
if t[0] < 0.5 then begin
tvar1:= tur;
rost:= true;
end;
if t[0]>1 then begin
tvar1:=tus; {установкафлагов}
rost:=false;
end;
for i:=0 to max‑1 do
{длительность переходного процесса max * h = 5000*0.04 =200 часов}
begin
k1:=h*f (t[i], tv[i], tvar1);
k2:=h*f (t[i]+(h/2)*tv[i]+(h/8)*k1, tv[i]+k1/2, tvar1);
k3:=h*f (t[i]+(h/2)*tv[i]+(h/8)*k1, tv[i]+k2/2, tvar1);
k4:=h*f (t[i]+h*tv[i]+(h/2)*k3, tv[i]+k3, tvar1);
t [i+1]:=t[i]+h*(tv[i]+(1/6)*(k1+k2+k3));
tv [i+1]:=tv[i]+(1/6)*(k1+2*k2+2*k3+k4);
if (t [i+1]<=0.5) and (rost=false) then
begin
tvar1:=tur;
rost:=true;
end;
if (t [i+1]>=1) and (rost=true) then
begin
tvar1:=tus;
rost:=false;
end;
end;
end;
function work.f (y, ys, tvar:real):real;
begin
f:=(tvar-y – (t1+t2)*ys)/(t1*t2);
end;
procedure StartGraph;
var
Driver, Mode: Integer;
begin
Driver:= Detect;
InitGraph (Driver, Mode, «);
Setbkcolor(white);
End;
procedure Setka;
var
i:integer;
begin
ClearViewPort;
setcolor(8);
for i:=0 to 10 do
begin
line (round(GetMaxX*i/10), 0, round (GetMaxX*i/10), GetMaxY);
line (0, round (GetMaxY*i/10), GetMaxX, round (GetMaxY*i/10));
end;
End;
Procedure Work. Setka_par;
Var
I, J: Integer;
St: String;
Jt:real;
dop: integer;
Begin
if t[0]>1 then dop:=0;
if t[0] <0.5 then dop:=-3;
settextstyle (0,1,2);
outtextxy (round(0.05*GetMaxX), round (0.15*GetMaxY), 'ТЕМПЕРАТУРА, C');
settextstyle (0,0,1);
for i:=0 to 9 do Begin
jt:=h*max*i/10;
str (jt:3:0, st);
outtextxy (round(GetMaxX*i/10+8), round (GetMaxY/2+8), st)
End;
settextstyle (0,0,2);
outtextxy (round(0.6*GetMaxX), round (0.8*GetMaxY)+5,'Время, час');
settextstyle (0,0,1);
j:=5+dop;
FOR i:= 0 to 5 do begin
str (j, st);
outtextxy (5, round (GetMaxY*i/5+4), st);
j:=j‑1
end;
end;
procedure Work. Show;