P:Passenger = ((Name:'Lubkovsky';Number:3;Wt:2.5),
(Name:'Davudov';Number:5;Wt:7),
(Name:'Beluy';Number:4;Wt:5),
(Name:'Molodenova';Number:5;Wt:7.5),
(Name:'Sereda';Number:8;Wt:9.5));
Нужно определить следущее: имеються ли 2 человека с одинаковым кол-вом и разлиаються по весу не более чем на 0.5
Я задал так что есть совпадение:
Как вычеслить совпадения в массиве?код Pascal/Delphi
(Name:'Davudov';Number:5;Wt:7),
(Name:'Molodenova';Number:5;Wt:7.5),
А вот как это посчитать, и вывести? Подскажите пожалуйста.