Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
uses crt;
var a, b, c : integer;
begin
clrscr;
write('nhap canh a, b, c : ');readln(a, b, c);
if (a + b > c) and (a + c > b) and (b + c > a) then
if (a*a = b*b + c*c) or (b*b = a*a + c*c) or (c*c = a*a + b*b) then
writeln('ba canh la tam giac vuong')
else writeln('khong la ba canh tam giac vuong')
else writeln('khong la so dai canh tam giac');
readln
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
854
691
uses crt;
var a,b,c:integer;
begin
write('nhap a:');readln(a);
write('nhap b:');readln(b);
write('nhap c:');readln(c);
if (a<b+c) and (b<a+c) and (c<a+b) then if (a*a+b*b=c*c) or (a*a+c*c=b*b) or (b*b+c*c=a*a) then writeln('3 canh tao ra tam giac vuong') else writeln('3 canh tao ra tam giac thuong') else writeln('ko tao ra tam giac');
readln;
end.
Hãy giúp mọi người biết câu trả lời này thế nào?
tôi sẽ để cậu có chuyện như ý muốn
kkk
854
691
xin phép mod e off trc ạ, e có vc r ạ
ừm
bye bye em
854
691
sang năm sau có lẽ e sẽ gắn bó vs hoidap nh hơn
854
691
bye mod ạ
bye em
Bảng tin