Viết giúp em chương trình tính diện tích tam giác vuông ạ
2 câu trả lời
Uses crt;
Var a,b,s:real;
Begin
Clrscr;
Read(a,b);
s:=1/2*(a*b);
Write(s:0:2);
Readln;
End.
uses crt;
var a,b,c:byte;
begin
clrscr;
writeln ('nhap a');readln(a);
writeln('nhap b');readln(b);
c:=1/2*a*b;
writeln('dien tich c =', c);
readln;
end.
