Переделка задачи на Record

[alex_fcsm]

Из всех постов я пока и не понял что значит лучше?
1. Меньше всего раз отдавался на ремонт
2. Наибольшая диагональ


Как определить кто принес больше доход:
1. Выполнил больше всего заказов
2. Ввести дополнительное поле в запись и по нему определить

[Impario]

Ну пожалуйста не могли бы вы помочь мне с кодом я не могу понять как пожалуйста ддобавте в ту задачу дополнительный код. Очень надо пожалуйста.

[Impario]

Просто мне нужно найти лучший монитор из вводимых пользователем.

[alex_fcsm]

Как я понял из 10 поста, лучший монитор - тот у которого больше диагональ

Тогда добавляем напрмиер переменную max:integer(кстати i тоже не мешало бы)


после всех инициализаций

max:=1;
for i:=2 to k do
 if Remont[i].Diagonal>Remont[max].Diagonal then max:=i;

writeln('Лучший '+Remont[max].Model);

[puporev]

Я бы эту тему в юмор перенес. Правда, ржал над вопросами.Извините за офф-топ.