Помогите с паскалем.
Вводится стороны прямоугольника. Найти периметр фигуры, образованной последовательным соединением середин сторон прямоугольника.

Там получится ромб с длиной стороны, равной гипотенузе треугольника с катетами равными половинам введенных длин сторон.
var
  a,b:real;
begin
  Write('Задайте через пробел стороны прямоугольника: ');
  Readln(a,b);
  Writeln('Периметр ромба равен ',4*sqrt(sqr(a/2)+sqr(b/2)))
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.