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

287

299

Посмотреть ответы 2

Ответы на вопрос:

tasyakondrateva0

Информатика

4,8(58 оценок)

// 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) end end. примеры: введите через пробел три цифры 2 0 5 520 введите через пробел три цифры 0 5 0 500 введите через пробел три цифры 3 9 5 хотя бы одна цифра должна быть четной