• 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
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