Задача на сравнение двух чисел

[шнур]

Задача на сравнение двух чисел

здорово народ помогите тут такая проблема, препад дал программу заделать из двух чисел найти максимально и минимальное значения не используя ветвящийся алгоритм оператор "If then else" использовать нельзя только линейкой

 

[Vladimir_S]

VAR
 a,b:Real;
BEGIN
 Read(a,b);
 WriteLn(a>b);
 ReadLn;
END.

 

[Света=)]

жестокая задача=)