Задача 15 Урок 9

Задача 15 Урок 9

У вас есть три числа (три переменные) найдите их медиану(link is external)

var a, b, c: integer;
begin
  readln(a,b,c);
  if (a>b) and (a<c) then
    writeln(a)
  else if (c>b) and (c<a) then
    writeln(c)
  else
    writeln(b);
  readln();
end.