Паскаль пмагатие программа вводит длины сторон прямоугольника и вычисляет длину окружности описанной вокруг прямоугольника

Var a,b: real;
begin
  write(длины сторон a и b  через пробел: );
  readln(a,b);
  writeln(радиус окружности = ,sqrt(a*a+b*b)/2:6:2);
end.

длины сторон a и b  через пробел: 3 4
радиус окружности =   2.50