Информатика. Решите ** языке Паскаль. И блок схема Даны катет а и гепотенуза вычеслить ...

Question

Информатика. Решите на языке Паскаль. И блок схема
Даны катет а и гепотенуза вычеслить
СВ^2=АВ^2-АС^2
СВ=КОРЕНЬ ИЗ АВ^2-АС^2
Sавс=АС*СВ*1\2

Answer 1

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