Создайте алгоритм нахождения площади прямоугольного триугольника и оформите его в виде блок схемы

Var
a,b,c,S,P;
begin
writeln ('Введите А ');
readln (a);
writeln ('Введите B ');
readln (b);
c:=sqrt(a*a+b*b);
P:=a+b+c;
writeln ('Площадь треугольника равна --> ',P);
end.