Quảng cáo
2 câu trả lời 2023
uses crt;
var
a,b,c: integer;
begin
write(‘nhap 3 canh tam giac a,b,c ‘); read(a,b); readln(c);
If (a+b<=c) and (b+c<=a) and (c+a<=b) then write(‘ba canh nay khong phai la ba canh tam giac’)
else
begin
If (a*a+b*b=c*c) or (b*b+c*c=a*a) or (c*c+a*a=b*b) then write(‘ba canh nay la ba canh cua tam giac vuong’);
If (a*a+b*b>c*c) or (b*b+c*c>a*a) or (c*c+a*a>b*b) then write(‘ba canh nay la ba canh cua tam giac nhon’);
If (a*a+b*b<c*c) or (b*b+c*c<a*a) or (c*c+a*a<b*b) then write(‘ba canh nay la ba canh cua tam giac tu’);
end;
readln
End.
Program Hotboy ;
uses crt;
var x,y,z:real;
begin
Clrscr;
write('Nhap canh x,y,z');readln(x,y,z);
if sqr(x)+sqr(y)=sqr(z) or sqr(y)+sqr(z)=sqr(x) or sqr(x)+sqr(z)=sqr(y) then write(x:3,y:3,z:3'la 3 canh cua 1 tam giac vuong')
else write(x:3,y:3,z:3' khong phai 3 canh cua 1 tam giac vuong');
readln
end.
Quảng cáo
Bạn muốn hỏi bài tập?
Câu hỏi hot cùng chủ đề
-
2235 điểm
-
I miss you
2045 điểm
-
𓇼 ⋆.˚annabelle⋆.˚ 𓇼 1260 điểm
-
Judy Hopps
1100 điểm
-
bích hồng nguyễn 760 điểm
-
`color{red}text{HuyTùng`
530 điểm
-
zai đẹp siu
490 điểm
-
lọ hà nội
440 điểm
-
dũng ngon hơn ok
405 điểm
-
Haruto[pad] 395 điểm
-
chê ng tốt chốt ng tồi.
365 điểm
-
n.t.an
300 điểm
-
⋅˚₊‧ ଳ⋆.࿔*:･𝙇ệ_ဗီူ_𝙥𝙝𝙪_ဗီူ_𝙣𝙝â𝙣⋅˚₊‧ ଳ⋆.࿔*:･
245 điểm
-
minhxinhquama
190 điểm
-
✿ 𝓝𝓪̂́𝓶 🍄
180 điểm
Rút gọn
Bài viết mới nhất Lớp 11
-
3 năm trước3535
-
3 năm trước3376
