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.