Составить программу,которая упорядочивает 2 числа по убыванию и находит максимальное из них.

Var a,b:integer;
begin
writeln(a);
readln(a);
writeln(b);
readln(b);
if a>b then writeln(a, , , b) else writeln(b, , ,a);
if a>b then writeln(a, - максимум) else writeln(b, - максимум);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.