Сформировать список лыжников, учавствующих в забеге

[DeadWarlock]

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

[p51x]

раздел фриланс ниже

[Stilet]

Описываешь тип:

type
 Man=record
  FIO,Country:String;
  ID:Integer;
  DateBegin,DateEnd:DateTime;
 end;

Далее массив:

Mans:array[1..10] of Man;

Потом вводишь:

For i:=1 to 10 do begin
 Write('FIO ');Readln(mans[i].FIO);
 Write('Number ');Readln(mans[i].ID);
 Write('Date Begin');Readln(mans[i].DateBegin);
 Write(Date End ');Readln(mans[i].DateEnd);
end;

Вот и все - список сформирован. Теперь так же в цикле можешь его вывести на экран.
единственное что я не помню так это есть ли в паскале тип DateTime