Question

Написать программу для вычисления периметра прямоугольника со сторонами а,d (линейные программы Паскаля)

Answer 1

Program BiFi;
Var a,d:real;
Begin
readln(a);
readln(d);
writeln('P=',2*(a+d));
readln;
end.