clear all;
clc;
global A B C
A=input('Ingrese el primer lado del triángulo: ');B=input('Ingrese el segundo lado del triángulo: ');C=input('Ingrese el tercer lado del triángulo: ');
if (A<B+C)&&(B<A+C)&&(C<A+B)
if (A==B)&&(B==C)
fprintf('El triángulo es equilatero\n'); fprintf('Los angulos internos son 60° cada uno\n'); elseif (A==B)||(B==C)
ang1=(acos((A^2-B^2-C^2)/(2*B*C)))*180/pi;
if ang1>90
ang1=180-ang1;
end
ang2=(acos((B^2-A^2-C^2)/(2*A*C)))*180/pi;
if ang2>90
ang2=180-ang2;
end
ang3=(acos((C^2-A^2-B^2)/(2*A*B)))*180/pi;
if ang3>90
ang3=180-ang3;
end
fprintf('El triángulo es isósceles\n'); fprintf('El primer ángulo es: %2.2f\n',ang1); fprintf('El segundo ángulo es: %2.2f\n',ang2); fprintf('El tercer ángulo es: %2.2f\n',ang3); else
ang1=(acos((A^2-B^2-C^2)/(2*B*C)))*180/pi;
if ang1>90
ang1=180-ang1;
end
ang2=(acos((B^2-A^2-C^2)/(2*A*C)))*180/pi;
if ang2>90
ang2=180-ang2;
end
ang3=(acos((C^2-A^2-B^2)/(2*A*B)))*180/pi;
if ang3>90
ang3=180-ang3;
end
fprintf('El triángulo es escaleno\n'); fprintf('El primer ángulo es: %2.2f\n',ang1); fprintf('El segundo ángulo es: %2.2f\n',ang2); fprintf('El tercer ángulo es: %2.2f\n',ang3); end
else
fprintf('El triángulo no existe\n');end
Crear cuenta
Comentarios sobre la versión: R2013a (0)
No hay comentarios