Даны целые числа a b m n. числа a и b , m n умножаются и суммируются. суммы этих чисел выводятся в порядке убывания , а результат умножения в порядке возрастания. пример вывода сумма а и в =34, м и н = 11 произведение а и в = 3 м и н = 11

Program qq;
vara,b,m,n,sum,umn,sum1,umn1:integer;
BEGINwrite('Введите 4 числа: '); readln(a,b,m,n);
sum:= a+b;sum1:= m+n;
umn:= a*b;umn1:= m*n;
writeln('Сумма a и b = ',sum);writeln('Сумма m и n = ',sum1);
writeln('Произведение a и b = ',umn);writeln('Произведение m и n = ',umn1);
END.