// PascalABC.NET 3.1, сборка 1172 от 19.02.2016begin var a:=ReadReal('Длина участка'); var b:=ReadReal('Ширина участка'); var c:=ReadReal('Цена 1 метра забора'); Writeln('Стоимость забора ',c*2*(a+b))end.Тестовое решение:Длина участка 20.8Ширина участка 15Цена 1 метра забора 250.4Стоимость забора 17928.64