1. Inicio

2. Declaración

//Variables de la 1ra Formula

Resp1, G, F, M1, M2, R ← Real;

Fuerza_Atracc(Real x, Real y, Real z) ← Real;
//Variables de la 2da Formula

Resp2, FEM, FM1, FM2, T ← Real;

Voltaje(Real a, Real b, Real c) ← Real;

//Variables de la 3ra Formula

Resp3, Frec_An, Ma, Dis, Mom_In ← Real;

Frecuencia (Real g, Real h, Real i) ← Real;

//Variable para todas las formulas

Opción ← Entero;

Escribir "Menú";

Escribir "1. Fuerza de Atracción";

Escribir "2. Fuerza Electromotriz";

Escribir "3. Frecuencia Angular";

Leer (Opcion);

En caso sea (Opcion)

Caso1:

G = 6,674 * 10^(-11);

Leer (M1, M2, R);

F=Fuerza_Atracc(M1, M2, R);

Escribir (F);

Fin_Caso1

//Zona de Funciones Caso1

Fuerza_Atracc(Real x, Real y, Real z)

{

Resp1=((G)*(X)*(Y))/((Z)^2)

Retornar (Resp1);

}

Fin_Fuerza_Atracc

Caso2:

Leer (FM1, FM2, T);

FEM=Voltaje(FM1, FM2, T);

Escribir (FEM);

Fin_Caso2

//Zona de Funciones Caso 2

Voltaje (Real a, Real b, Real c)

{

RESP2 = (A - B) / (C^2)

Retornar (Resp2);

}

Fin_Voltaje

Caso3:

g=9.8;

Leer (Ma, Dis, Mom_In);

Frec_An=Frecuencia (Ma, Dis, Mom_In);

Escribir (Frec_An);

Fin_Caso3

Fin_Caso

//Zona de Funciones Caso 3

Frecuencia (Real x, Real y, Real z)

{

Resp3=RC(((X)*(g)*(Y))/(Z))

Retornar (Resp3);

}

Fin_Frecuencia