[lmikle]

Ну и чем тебе помочь? За тебя написать программу?

Вот тебе начало:

Код:

type
  TRRSchedule = record
    DepartureDate : TDate;
    DepartureTime : TTime;
    Destination : String[100];
    AvailableSeats : Integer;
  end;

var
  F : File Of TRRSchedule;