Question

Дано 3 числа. Росположены ли рядом max и min число. Блок схемой пж.

Answer 1

Ответ:

program beside;

var a, b, c, maxi, mini: integer;

begin

 Read(a, b, c);

 maxi := max(a, max(b, c));

 mini := min(a, min(b, c));

 if (b = maxi) or (b = mini) then

   Writeln('Yes')

 else

   Writeln('No')

end.

Объяснение: