PROGRAM Pythageros (Input,Output);
VAR
   Side1, Side2, Hypotenuse : Real;
BEGIN
   Writeln('This program computes the length of the hypotenuse');
   Writeln('of a right triangle given the lengths of the two sides.');
   Writeln('Enter the lengths of the two sides of a right triangle:');
   Readln(Side1,Side2);
   Hypotenuse := Sqrt(Sqr(Side1) + Sqr(Side2));
   Writeln('Hypotenuse = ',Hypotenuse:6:2);
END.
