var a,b,S,P:integer;
begin
readln(a,b);
S:=a*b;
P:=2*a+2*b;
writeln('Площадь прямоугольника равен: ', S);
writeln('Периметр прямоугольника равен: ', P);
end.
var a,b,S,P:integer;
begin
readln(a,b);
S:=a*b;
P:=2*a+2*b;
writeln('Площадь прямоугольника равен: ', S);
writeln('Периметр прямоугольника равен: ', P);
end.