даны катеты прямоугольного треугольника a b c найдите его периметр P(P=a+b+c).
составьте блок-схему и напишите программу ее решения
Program z1; var a,b,c,p:double; begin readln(a);readln(b); c:=sqrt(a*a+b*b); p:=a+b+c; writeln(p); readln end.