МНОГО БАЛЛОВ!помогите решить задачу,задача по программированию (pascal abc)сборник златопольского задача 1.44
даны стороны прямоугольника,найти его периметр и длину диагонали

Даны стороны прямоугольника a и b.

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

P = 2 * (a + b)

Диагональ — по теореме Пифагора:

d = √(a² + b²)

Программа на PascalABC:

pascal
program zadacha_1_44;
var
  a, b, p, d: real;
begin
  write('Введите стороны прямоугольника a и b: ');
  readln(a, b);
  p := 2 * (a + b);
  d := sqrt(a * a + b * b);
  writeln('Периметр = ', p:0:2);
  writeln('Длина диагонали = ', d:0:2);
end.

Например, если стороны прямоугольника 3 и 4, то:

• периметр: 2 * (3 + 4) = 14;

• диагональ: √(3² + 4²) = √25 = 5.

Ответ программы будет:

Периметр = 14.00
Длина диагонали = 5.00