как найти наибольшее из двадцати чисел? Решение в программе паскаль?

Оптовая цена учебникасоставляет 160 рублей. Розничная цена на 35% выше оптовой.Какое наибольшее число этих учебников можно купить по розничной цене на 8000 рублей?

Дано квадратное уравнение ax²+bx+c=0.Его корни x₁ и x₂.Найдите:

1) x₁ и b,если a=10,x₂=⅖ и c=2

2)x₁ и c,если a=12,x₂=-¾  и b=17

Количество теплоты, отводимое в единицу времени