• Lenguaje

    PSeInt (Pseudocódigo)

  • Descripción

    Evalúa la función: y = Cos(2Θ) para [0° ≤ Θ ≤ 360°] con intérvalos de π/12 radianes.

1
2
3
4
5
6
7
8
9
10
Proceso FuncionYCos2Theta
    Para i<-1 Hasta 25 Con Paso 1 Hacer
        Escribir "PROCESO ", i;
        angulo <- PI*(i-1)/12.0;
        _y <- COS(2.0*angulo);
        Escribir "Valor de  y: ", _y;
        Escribir "Valor de angulo: ", angulo;
        Escribir "";
    FinPara
FinProceso