Question

Если среди трех целых чисел x, y, z имеется хотя бы одно нечетное, то найти
минимальное число, иначе – максимальное.
Информатика паскаль

Answer 1

===== PascalABC.NET =====

begin

 var (x, y, z) := ReadInteger3;

 Print(x.IsOdd or y.IsOdd or z.IsOdd ? Min(x, y, z) : Max(x, y, z))

end.