[VolodinAS]

Есть ли способ оптимизировать такой код?

Код:

FlightArray220.money := 0;
    FlightArray220.exp := 0;
    FlightArray220.sec := 0;
    FlightArray220.mid_money := 0;
    FlightArray220.mid_exp := 0;
    FlightArray220.amount := 0;

    FlightArray221.money := 0;
    FlightArray221.exp := 0;
    FlightArray221.sec := 0;
    FlightArray221.mid_money := 0;
    FlightArray221.mid_exp := 0;
    FlightArray221.amount := 0;

    FlightArray219.money := 0;
    FlightArray219.exp := 0;
    FlightArray219.sec := 0;
    FlightArray219.mid_money := 0;
    FlightArray219.mid_exp := 0;
    FlightArray219.amount := 0;

    FlightArray222.money := 0;
    FlightArray222.exp := 0;
    FlightArray222.sec := 0;
    FlightArray222.mid_money := 0;
    FlightArray222.mid_exp := 0;
    FlightArray222.amount := 0;

    FlightArray186.money := 0;
    FlightArray186.exp := 0;
    FlightArray186.sec := 0;
    FlightArray186.mid_money := 0;
    FlightArray186.mid_exp := 0;
    FlightArray186.amount := 0;

P.S.:

Код:

type TFlightData = record
  money, exp, sec, amount: Integer;
  mid_money, mid_exp: Real;
end;