Информатика, составить алгоритм вычисления приметра и плошади прямоугольного треугольника по длинам a и b двух катетов
погите пожалуста
Var p, s, a, b : real; begin writeln ('Введите - А'); readln (a); writeln ('Введите - Б'); readln (b); p:=Sqrt(a*a+b*b)+a+b; s:=a*b/2; writeln ('Периметр - '+p); writeln ('Площадь - '+s); end.