Question

viết chương trình tính diện tích ,chu vi tam giác vuông biết 2 cạnh a,b

GIÚP MÌNH!!!!!

Answer 1

var a,b,s:integer;

c:word;

begin

write('nhap avà b ');

read(a,b);

s:=a*b*1/2;

c:=(a+b)*2;

writeln('dien tich la '; s );

write('chu vi la 'c);

readln

end

Answer 2

program CVDT;

uses crt;

var a,b,c,P,S;

begin

Writeln('Nhap a va b');

Readln(a,b);

c:= a*a +b*b; S:= (a*b)/2;

Writeln('Dien tich tam giac vuong la ',S);

writeln('Chu vi tam giac vuong la ', SQRT(c);

Readln;

end.