Что такое колхозы? Как относились к ним разные слои крестьянства?

Колхозы - это крупные сельскохозяйственные производственные кооперативы. Разные слои крестьянство по-разному относились к коллективизации. Самые бедные крестьяне положительно восприняли политику коллективизации. Они связывали с ней свое будущее. Середняки настороженно относились к данной политике. Они имели собственность, которую боялись потерять, боялись, что все обобщат и они не получат ничего взамен. Но среди них вели агитационно-пропагандистскую работу, большинство середняков поддержали колхозы. Зажиточные крестьяне, или кулаки, они негативно отнеслись к коллективизации. Они имели имущество, капитал, они не желали все терять, они были против насильственных методов организации колхозов и оказывали сопротивление. Среди них не вели должным образом работу, советская власть не смогла на них опереться и использовать их опыт для организации колхозов, так как они в большинстве были хорошими хозяевами.

а)
const
  n=2;
type
  ped=record
    nazv:string[128];
    den:string[16];
    vr:string[5]; // '12.00'
    channel:string[128];
  end;
var
  tv:array[1..n] of ped;
  i:integer;
  std,stvr:string;
begin
  for i:=1 to n do
    begin
      write('Введите название телепредачи: ');  readln(tv[i].nazv);
      write('Введите день телепредачи: ');  readln(tv[i].den);
      write('Введите время телепредачи: ');  readln(tv[i].vr);
      write('Введите название канала: ');  readln(tv[i].channel);
    end;
  write('Введите день эфира: ');  readln(std);
  write('Введите время эфира: '); readln(stvr);
  for i:=1 to n do
    begin
      if (tv[i].den=std) and (tv[i].vr=stvr) then
        begin
          write('День выхода телепредачи: ', tv[i].nazv,'на канале: ',tv[i].channel,' - ',tv[i].den, ', время выхода - ',tv[i].vr);
          writeln;
        end;
    end;
  readln;
end.