Question

как можно быстрее пожайлуста

Answer 1

Ответ:

2

3

4

5

6

7

8

9

10

var a,b,c:integer;

begin

Readln(a,b,c);

if (a>b) and (b>c) then

Writeln(a,' ',b,' ',c)

else

Writeln('Парних чисел немае');

Readln;

end.

Объяснение:

на паскале, поскольку не написано в какой программе нужно