Question

fie un triunghi dreptungic cu latura a b c determinati aria​

Answer 1

Program P1;

var a,b,c,p,a :integer;

begin

readln (a,b,c);

p:=a+b+c;

a:=ab/2;

writeln (p);

writeln (a);

end.