{ Exemplo tri0.pas
}

var
   lado1, lado2, lado3: real;

begin

lado1:=5;
lado2:=4;
lado3:=2;



    writeln('Lados: ', lado1, lado2, lado3);

    if (lado1 = lado2) and (lado2=lado3) then
    begin
         writeln('Triƒngulo Equil tero');
    end
    else
    begin
    if (lado1 <> lado2) and (lado2 <> lado3) and (lado1 <> lado3) then
    begin
         writeln('Triƒngulo Escaleno');
    end
    else
        writeln('Triƒngulo Is¢sceles');
    end


end.