Призеры

← →
Leo^Sun © (2002-06-02 22:30) [0]

Помогите создать список вида: номер имя набранные очки, чтобы призеры сортировались по набранным очкам...

← →
Daddy (2002-06-03 19:30) [1]

ЭЭЭЭЭ.
Список = record
Номер: byte;
Имя: string;
Очки: longint;
end;
var
Призеры: array[1..10] of список;
max:=longint

Ну а далее сортируй как хочешь, ну типа в цикле:

If Список.Очки[n]+1<Список.Очки[n] then Max:=Список.Очки[n]

Вотъ

Призеры Найти похожие ветки