Question

Viết chương trình xét xem một tam giác có là tam giác cân hay không khi biết ba cạnh của tam giác

Answer 1

Program Tam_giac_deu;

 

uses crt;

var a,b,c: real;

begin

clrscr;

write(‘Nhap a = ‘); readln(a);

write(‘Nhap b = ‘); readln(b);

write(‘Nhap c = ‘); readln(c);

if (a = b) and (b = c) then writeln(‘La tam giac deu’)

else

writeln(‘Khong phai la tam giac deu’);

readln

end.