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

Формула c^2=a^2+c^2 

Программа 
var a, b, S: real;
begin
 writeln(Введите a);
 readln(a);
 writeln(Введите b);
 readln(b);
 S:=Sqrt(a*a+b*b);
 writeln(Извлеченный корень из числа "c" : , S:1:1);
end.

Если a=3, b=2, тогда корень 3.6