Proceso Formula
Definir opcion Como Entero
Escribir "**************************"
Escribir " Menú"
Escribir "**************************"
Escribir "1: potencia"
Escribir "2: peso"
Escribir "3: aceleración"
Escribir "4: aceleracion doble bucle"
leer opcion
Segun opcion Hacer
1:
Escribir "potencia"
Definir v,i,r,cf Como Real
inicial<-110
final<-220
v<-incial
cf<-0.5
Escribir "ingrese la corriente"
leer i
Para v<-incial Hasta final Con Paso 10 Hacer
p<-v*i*cf
Escribir "corriente= ",i," y para v= ",v," la potencia es: ",p
Fin Para
2:
Escribir"Peso"
Definir incio,final,w,m,g Como Real
inicio<-2.5
final<-10
m<-inicio
g<-9.81
Para m<-inico Hasta final Con Paso 0.5 Hacer
w<-m*g
Escribir "peso: ",w
Fin Para
3:
Escribir"distancia"
Definir incio,final,d,v,t Como Real
inicio<-10
final<-100
v<-inicio
t<-8
Para v<-inico Hasta final Con Paso 5 Hacer
d<-v*t
Escribir "distancia: ",d
Fin Para
4:
Escribir"distancia con dos bucles"
Definir incio,final,d,v,t Como Real
inicio<-10
final<-100
i<-20
f<-100
v<-inicio
Para v<-inico Hasta final Con Paso 5 Hacer
Para t<-i Hasta f Con Paso 1 Hacer
d<-v*t
Escribir "distancia con dos bucles: ",d
Fin Para
Fin Para
Fin Segun
FinProceso
-Diagrama
Comments