Mọi người giúp em với ạ . Viết chương trình nhập vào 3 cạnh của 1 tam giác , kiểm tra xem 3 cạnh đó có phải là 3 cạnh của 1 tam giác cân hay không .
2 câu trả lời
uses crt;
var a,b,c:longint;
begin
clrscr;
write('Nhap 3 canh: ');readln(a,b,c);
if(a=b)or(b=c)or(a=c) then writeln('Day la tam giac can')
else writeln('Day khong la tam giac can');
readln
end.
program kiemtra;
uses crt;
var a,b,c:integer;
begin
clrscr;
write('Nhap do dai canh thu nhat:'); readln(a);
write('Nhap do dai canh thu hai: '); readln(b);
write('Nhap do dai canh thu ba: '); readln(c);
if (a=b) or (b=c) or(a=c) then write('La ba canh cua tam giac can')
else write('Khong la ba canh cua tam giac can');
readln
end.
