Экономическая эффективность производства молока

    В Беларуси при привязном содержании скота наиболее распространенным является доение в стойлах в молокопровод. Соответствующим этой технологии оборудованием оснащено около 90 % молочнотоварных ферм. Процессы доения выполняются, но зачастую — некачественно. Устаревшее и изношенное оборудование подвержено микробиальному загрязнению, так как нет возможности качественно промыть большое количество стыков и соединений. При этом часто используется не специальное моющее средство, а кальцинированная сода. При доении микробиальная флора вымывается из непромытых стыков и увеличивается в геометрической прогрессии. В результате происходит разрушение и слипание жировых шариков, усиливается окисление, а качество продукта ухудшается.

    Мировой опыт показывает, что наибольшую перспективу с точки зрения производительности доения, качества молока и сохранности дойного стада имеют автоматизированные установки для доения коров в зале, которые отличаются высокой производительностью и удобством обслуживания животных. В результате проведения реконструкции ферм и комплексов в настоящее время в республике предпочтение отдается беспривязному содержанию коров и доению их в доильных залах, оборудованных современными доильными установками. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Заключение.

Выводы  и предложения. 

Выполнив  курсовую работу по теме «Экономика и  организация производства молока», где подробно были изучены производственные и экономические показатели на примерах таблиц. Мной было изучено народнохозяйственное значение производства молока. Также были рассмотрены пути повышения эффективности производства молока. Для повышения эффективности производства молока в хозяйстве важно изыскать внутренние резервы снижения себестоимости и увеличения валового производства молока, укрепление кормовой базы. Нужно учитывать существующие недостатки и промахи и постепенно ликвидировать их. При этом следует опираться на имеющиеся ресурсы и использовать их наиболее рационально. Обязательно нужно учитывать состояние рынка производимой продукции.

Свои расчеты  проводил на основании данных годовых  отчётов СПК «Бережное» за 2007, 2008, 2009 гг. Исходя из данных расчётов, можно  сделать следующие выводы:

В структуре  земельных угодий в СПК «Бережное» преобладает в большей степени: Сельскохозяйственных угодий - это  пастбища, пашни и сенокосы. Многолетние  насаждения и залежи отсутствуют. Несельскохозяйственные угодия – приусадебные участки, коллективные сады и огороды.

В структуре  посевных площадей хозяйства  СПК  «Бережное» наибольший удельный вес  занимали зерновые и зернобобовые культуры.

В структуре  товарной продукции в СПК «Бережное» преобладает в большей степени  по растениеводству – зерно, а  по животноводству – мясо КРС.  В  целом по хозяйству преобладает  животноводство.

Анализируя динамику производственно-экономических показателей  за 2007-2009 гг., можно отметить, что они не возросли за этот период, в целом предприятие работает не стабильно.

Сделав курсовую, я могу сказать, что я полностью ознакомился и изучил данную мне тему. Я научился пользоваться годовым отчетом и делать выводы по расчетам. 
 
 
 
 

Список  использованной литературы.

Бусел И.П. «Экономика и организация производства с/х производства» - Мн.: Ураджай, 1999 г. стр. 129-137.

Лещиловский П.В. «Экономика предприятий и отраслей АПК» - Минск: БГЭУ, 2001г. стр. 432-444.

Минаков И.А.  «Экономика сельского хозяйства» - Москва: Колос, 2000г. стр. 288-301. 
 
 
 
 
 
 
 
 
 
 

Приложение.

unit Unit1; 

interface 

uses

  Windows, Messages, SysUtils, Variants, Graphics, Controls, Forms,

  Dialogs, AxCtrls, OleCtrls, VCF1, StdCtrls, ExtCtrls, XPMan, jpeg,

  Buttons, ComCtrls, Menus, ImgList, Classes, ActnList, MPlayer; 

type

  TForm1 = class(TForm)

    MainMenu1: TMainMenu;

    N1: TMenuItem;

    N2: TMenuItem;

    N3: TMenuItem;

    N4: TMenuItem;

    PopupMenu1: TPopupMenu;

    N5: TMenuItem;

    N6: TMenuItem;

    XPManifest2: TXPManifest;

    N7: TMenuItem;

    fb: TF1Book;

    Panel1: TPanel;

    GroupBox3: TGroupBox;

    GroupBox4: TGroupBox;

    Label2: TLabel;

    rb11: TRadioButton;

    rb12: TRadioButton;

    Timer1: TTimer;

    ImageList2: TImageList;

    GroupBox1: TGroupBox;

    BitBtn2: TBitBtn;

    BitBtn3: TBitBtn;

    Edit1: TEdit;

    GroupBox2: TGroupBox;

    rb1: TRadioButton;

    procedure FormActivate(Sender: TObject);

    procedure FormClose(Sender: TObject; var Action: TCloseAction);

    procedure N4Click(Sender: TObject);

    procedure N2Click(Sender: TObject);

    procedure N5Click(Sender: TObject);

    procedure N6Click(Sender: TObject);

    procedure rb1Click(Sender: TObject);

  procedure N7Click(Sender: TObject);

    procedure BitBtn2Click(Sender: TObject);

    procedure BitBtn3Click(Sender: TObject);

    procedure Timer1Timer(Sender: TObject);

    procedure fbStartEdit(Sender: TObject; var EditString: WideString;

      var Cancel: Smallint);

 

    procedure Timer2Timer(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end; 

var

  Form1: TForm1;

  a : integer; 

implementation 

uses Unit2; 

{$R *.dfm} 

procedure TForm1.FormActivate(Sender: TObject);      //загрузка данных  при запуске

var i : SmallInt;

begin

rb1.Checked:= true;

fb.Visible:=true;

i:=F1FileExcel5;//StrToInt(Edit1.Text);

  fb.Read(extractfilepath(application.ExeName)+'baza\'+ IntToStr(0)+'.obas',i);

//  FB.ShowColHeading:=FALSE;

  fb.ShowRowHeading:=false;

  fb.ShowEditBar:=false;

  fb.ShowGridLines:=false;

  fb.ShowHScrollBar:=f1On;

  fb.ShowSelections:=f1On;

  fb.ShowTabs:=f1TabsOff;

  fb.Modified:=false; 

end; 

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction); // для сохранения

var i : SmallInt;

begin

if (fb.Modified=true)then

    begin

    if Application.MessageBox('сохранить  изменения?','Сохранить  всё',MB_YESNO or MB_ICONQUESTION)=IDYES then

    begin

    N2Click(self);

    form2.Close;

    end else form2.Close;

    end else form2.Close;

       END;

procedure TForm1.N4Click(Sender: TObject); // выход

begin

close;

end; 

procedure TForm1.N2Click(Sender: TObject);   // просто сохранение

var i : SmallInt;

begin

   i:=F1FileExcel5;//StrToInt(Edit1.Text);

  fb.Write(extractfilepath(application.ExeName)+'baza\'+'0.obas',i); 

  FormActivate(self);

end; 

procedure TForm1.N5Click(Sender: TObject);

begin

      N2Click(self);

end; 

procedure TForm1.N6Click(Sender: TObject);

begin

close;

end; 

procedure TForm1.rb1Click(Sender: TObject);      // вывод таблиц

begin

fb.Visible:=true; 

end; 
 
 
 
 
 
 
 

procedure TForm1.N7Click(Sender: TObject);        // о программе

begin

Application.MessageBox('Данную программу разработал Криволевич Павел'+#13+'Столинский государственный аграрно-экономический коллежд'+#13+'Группа П-2 2010','О программе',MB_OK or MB_ICONQUESTION);

end; 

procedure TForm1.BitBtn2Click(Sender: TObject);

begin

N2Click(self);

end; 

procedure TForm1.BitBtn3Click(Sender: TObject);

begin

close;

end; 

procedure TForm1.Timer1Timer(Sender: TObject);        // можно ли редактировать  таблицу

begin

if (rb11.Checked=false) then

begin

    fb.DragMode:=dmAutomatic; 

end  else

begin

    fb.DragMode:=dmManual; 

end;

if (fb.Modified=true) then

    begin

       BitBtn2.Enabled:=true;

    end else    BitBtn2.Enabled:=false;

    edit1.Text:=timetostr(time);

end;

procedure TForm1.fbStartEdit(Sender: TObject; var EditString: WideString;

  var Cancel: Smallint);

begin

if ((fb.Col<2) or (fb.Col>14)) or ((fb.Row>23) or (fb.Row<2))

//if ((fb.Col>2) or (fb.Col<7)) or ((fb.Row<23) or (fb.Row>7))

then

        begin

          cancel:=1;

        end;

end;

     procedure TForm1.Timer2Timer(Sender: TObject);

var i : integer;

begin

i:=I+1;

edit1.Text:=inttostr(i);

end; 

end.