а) Вместо строчки
f := max(max(a, b), max(c,d));
Вставить строчку
f := max(max(a, b), c);
б) Вместо строчки
f := max(max(a, b), max(c,d));
Вставить строчку
f := max(max(b, c), d);
в) Добавить функцию
function min (x, y: integer): integer;
begin
if x > y then min := y else min := x;
end
Вместо строчки
f := max(max(a, b), max(c,d));
Вставить строчку
f := min(min(a, b), min(c,d));
г) (с добавленной функцией из пункта в) !!!)
Вместо строчки
f := max(max(a, b), max(c,d));
Вставить строчку
f := max(max(a, b), max(c, d)) - min(min(a, b), min(c, d));