var a,b:real;
begin
readln(a,b);
writeln('Perimetr - ',2*(a+b));
end.
Program zadacha;
Var a,b,p: real;
Readln(a,b);
p:=(a+b)*2;
Writeln('Perimetr=',p,);
End.
var a,b:real;
begin
readln(a,b);
writeln('Perimetr - ',2*(a+b));
end.
Program zadacha;
Var a,b,p: real;
begin
Readln(a,b);
p:=(a+b)*2;
Writeln('Perimetr=',p,);
End.