Даны катеты прямоугольного треугольника. найти его гипотенузу и площадь . паскаль

// PascalABC.NET 3.0, сборка 1128 var   a,b,c:real; //a,b- катеты, с-гипотенуза begin   Write('Введите через пробел длины катетов треугольника: ');   Read(a,b);   c:=sqrt(a*a+b*b);   Writeln('Длина гипотенузы ',c:0:3,', площадь треугольника ',a*b/2:0:3) end. Тестовое решение: Введите через пробел длины катетов треугольника: 3.7 5.4 Длина гипотенузы 6.546, площадь треугольника 9.990