// PascalABC.NET 3.2, сборка 1359 от 11.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a,b:real;
Write('Введите через пробел длины катетов: '); Read(a,b);
Writeln('Длина гипотенузы равна ',sqrt(a*a+b*b))
end.
Пример
Введите через пробел длины катетов: 15.6 18
Длина гипотенузы равна 23.819319889535