Информатика. решите на языке паскаль. и блок схема даны катет а и гепотенуза вычеслить св^2=ав^2-ас^2 св=корень из ав^2-ас^2 sавс=ас*св*1\2

Var 
a,c:integer; 
b:real;
begin
  readln(a,c); 
  b:=sqrt(c*c-a*a);
  writeln('Sabc ',a*b/2);
end.