[ovojnova]

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

Код:

type B=record Багаж 
N:string[20]; ФИО пассажира 
M:integer; Количество вещей 
W:real; Общий вес вещей(кг) 
end; 

lmikle: пользуемся тегами

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

[friz]

логика такова:
1)Читаешь файл и записываешь содержимое в массив
2)Делаешь цикл по всему массиву в котором проверяешь условия, примерчик:

Код:

for i:=1 to n do
   for j:=1 to n do
   if (a[i].n=a[j].n) and (i<>j) and (abs(a[i].w-a[j].w)<0.5) then showmessage ('ЗЛОБНЫЙ КЛОН НАЙДЕН! :)');
 

[Aristarh Dark]

friz, убогий подход.
Представь что файл размером 1-2 ГБ

[friz]

не спорю, но думаю на олимпиаде таких файлов не будет
p.s. Предложи лучше!