Вводятся три цифры. Требуется составить из них наибольшее возможное четное число.
Знаю, что легкая, но туплю((((

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017// Внимание! Если программа не работает, обновите версию!begin  var L:=ReadSeqInteger('Введите через пробел три цифры',3).ToList;  if L.All(x->x=0) then Writeln('Хотя бы одна цифра должна отличаться от нуля')  else    if L.All(x->x.IsOdd) then Writeln('Хотя бы одна цифра должна быть четной')    else begin      var d3:=L.Where(x->x.IsEven).Min;      L.RemoveAt(L.FindIndex(x->x=d3));      var s:=L.OrderBy(x->x);      Writeln(s.Last,s.First,d3)      endend.Примеры:Введите через пробел три цифры 2 0 5520Введите через пробел три цифры 0 5 0500Введите через пробел три цифры 3 9 5Хотя бы одна цифра должна быть четной