EVP #8

Proceso Formula

        Definir opción como Entero

        Escribir "****************************"

        Escribir "      Menú      "

        Escribir "****************************"

        Escribir "Escribir " 1: Hallando la fuerza "     Escribir " 2: Hallar v "     Escribir " 3: Tiempo de encuentro  "     Escribir " 4: Opción cuatro "     Leer opcion     Segun opcion hacer         1:             Definir m, g, inicial, final Como Real             inicial = 2.5+0.5             final = 10             m = inicial             g = 9.81

            Para m = inial hasta final con paso 0.5 Hacer                 w = m * g                 Escribir "Resultado" , w;             FinPara         2:             Definir V, I, R, inicial, final Como Real             inicial = 1.0 + 0.1             Final = 5.0             I = inicial             Escribir " Asignar un valor a R "             Leer R             Para m = inicial hasta final con paso 0.1 Hacer                 v = I*R                 Escribir " El resultado es" , V;             FinPara         3:             Definir P, V, Z Como Real             Escribir "Velocidad 1"             Leer P             Escribir "Velocidad 2"             Para d = 20 hasta 80 con paso 30 Hacer                 Z = d/(p+v)                 Escribir "resultado", Z;             FinPara         4:             Definir A,B Como Entero             Definir C Como Real             Para A = 10 hasta 20 con paso 4 Hacer                 Para B = 1 hasta 10 con paso en 2 Hacer                     C = RC((A^2)+(B^2))                     Escribir " Resultado ", C;                 FinPara             De Otro Modo:                 Escribir " Esta fuera de rango "             FinPara     FinSegun FinProceso