даны целые числа a b m n. числа a и b

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.