Câu trả lời:
program Tam-giac-deu;
uses crt;
var a,b,c:integer;
begin
writeln(' Nhap so a '); readln(a);
writeln('Nhap so b' ); readln(b);
writeln('Nhap so c'); readln(c);
if (a=b) and (b=c) then writeln('do la ba canh tam giac deu')
else writeln('đó ko phải ba cạnh tam giác đều');
readln
end.