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

Question

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

Comments

это pascal

Answer 1

// 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