PASCALВычислить цена установки забора для прямоугольного участка с данными размерами,

это pascal

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

Тестовое решение:
Длина участка 20.8
Ширина участка 15
Стоимость 1 метра забора 250.4
Цена забора 17928.64