Напишите программу, которая вычисляет следующее значение. По теореме Пифагора, в прямоугольном треугольнике соотношение сторон C2 = A2+B2. Если A = 3, B = 2, каково значение C? в Pascal ABC

Program Teorema_P;
var    A, B, C: real;
begin
     writeln (Введите значение первого катета:);
     readln (A);
     writeln (Введите значение второго катета:);
     readln (B);
     C:=sqrt(A*A + B*B);
     writeln (Катет А = , A, , катет В = , B, , гипотенуза С = , C:5:3);
end.