-
Lenguaje
PSeInt (Pseudocódigo)
-
Descripción
Calcular el radio de la circunferencia circunscrita a un triángulo.
1
2
3
4
5
6
7
8
9
10
11
12
2
3
4
5
6
7
8
9
10
11
12
Proceso RadioDeLaCircunferenciaCircunscritaAUnTriangulo
Escribir Sin Saltar "Ingresa el valor de lado a:";
Leer lado_a;
Escribir Sin Saltar "Ingresa el valor de lado b:";
Leer lado_b;
Escribir Sin Saltar "Ingresa el valor de lado c:";
Leer lado_c;
semiperimetro <- (lado_a+lado_b+lado_c)/2;
radio <- lado_a*lado_b*lado_c/4.0/RC(semiperimetro*(semiperimetro-lado_a)*(semiperimetro-lado_b)*(semiperimetro-lado_c));
Escribir "Valor de radio: ", radio;
Escribir "Valor de semiperimetro: ", semiperimetro;
FinProceso
Escribir Sin Saltar "Ingresa el valor de lado a:";
Leer lado_a;
Escribir Sin Saltar "Ingresa el valor de lado b:";
Leer lado_b;
Escribir Sin Saltar "Ingresa el valor de lado c:";
Leer lado_c;
semiperimetro <- (lado_a+lado_b+lado_c)/2;
radio <- lado_a*lado_b*lado_c/4.0/RC(semiperimetro*(semiperimetro-lado_a)*(semiperimetro-lado_b)*(semiperimetro-lado_c));
Escribir "Valor de radio: ", radio;
Escribir "Valor de semiperimetro: ", semiperimetro;
FinProceso