Имеется прямоугольный участок земли с размерами a и b, сколько нужно проволоки чтобы обгородить весь участок
Var a,b,p:integer; begin; readln(a); readln(b); p:=2*a+2*b; writeln(p); end.