FUNCIONES Y PROCEDIMIENTOS
Bucle infinito
Bucle infinito en programación es un error que consiste en realizar un ciclo que se repite de forma indefinida ya que su condición para finalizar nunca se cumple.
Por definición un bucle debe contener condiciones que establezcan cuándo empieza y cuándo acaba, de manera que, mientras las condiciones se cumplan, ejecute una secuencia de código de manera repetitiva. En el caso de ciclo infinito, como la condición de finalización no se alcanza, el bucle sigue ejecutando el segmento de código indefinidamente.
Algoritmo
Proceso REPETICION_INFINITA
//INICIO
ESCRIBIR"********************************"
ESCRIBIR "REPETICION INFINITA"
ESCRIBIR "********************************"
leer opciones
SEGUN opciones Hacer
1:
ESCRIBIR "INGRESE EL ENESIMO TERMINO"
LEER n;
//valores iniciales
factorial<-1;
c<-1;
MIENTRAS (c<=n) hacer
factorial<-factorial*c;
c<-c+1;
FinMientras
//imprimir
Escribir "el factorial de", n, "es: ", factorial;
2:
ESCRIBIR "INGRESE EL ENESIMO TERMINO"
LEER n;
//valores iniciales
suma<-0;
c<-1;
MIENTRAS (c<=n) hacer
suma<-(suma+c);
c<-c+1;
FinMientras
//imprimir
Escribir "la suma de los", n, "terminos es: ", suma;
3:
ESCRIBIR "SERIE (((n!)-n)/(n-1))";
DEFINIR SERIE COMO REAL
LEER n;
//valores iniciales
SERIE=0;
FACTORIAL=1;
CONTADOR=1;
MIENTRAS (c<=n) hacer
faCTORIAL<-factorial*c;
c<-c+1;
SERIE<- SERIE+(FACTORIAL-CONTADOR)/(CONTADOR-1);
FinMientras
//imprimir
Escribir "LA SERIE DE", n, "es: ", SERIE;
4:
ESCRIBIR "SUMATORIA RC(n!/n+1)"
ESCRIBIR "INGRESE EL VALOR"
DEFINIR SERIE COMO REAL
LEER n;
//valores iniciales
SERIE<-0;
c<-1;
FACTORIAL<-1
MIENTRAS (c<=n) hacer
factorial<-factorial*c
c<-c+1;
SERIE<-(RC((FACTORIAL)/(N+1)))
FinMientras
//imprimir
Escribir "LA SERIE DE RC(n!/n+1)ES", SERIE;
5:
ESCRIBIR "TABLA DE MULTIPLICAR"
DEFINIR INICIAL, FINAL COMO ENTERO
INICIAL= 5;
FINAL=10;
ESCRIBIR "TABLA DEL ", n, " :";
LEER n;
c = INICIAL
MIENTRAS (C<=FINAL) HACER
ESCRIBIR C,"*", n, "=", C*n;
c<-c+1;
FinMientras
de otro modo
escribir "no es una opcion"
FinSegun
FinProceso
Diagrama de flujo
CLASE DEL JUEVES
Primera formula
Proceso MRUV
Escribir "****************"
Escribir "ACELERACION"
Escribir "****************"
//Declaracion
Definir t, Vf, Vo, a Como Real
Definir inicio, final Como Real
leer Vf, Vo
inicial<-0
final<-30
t<-inicial
//Proceso
Hacer
a<- (Vf * Vo)/t
t<- t+3.3
mientras(t<= final)
//Resultado
Imprimir (a)
FinProceso
Segunda formula
Proceso .
Escribir "****************"
Escribir "F=K(Q1*Q2)/D^2"
Escribir "****************"
//Declaracion
Definir F,K,Q1,Q2,D Como Real
Definir inicio, final Como Real
leer Q1,Q2
K<-9*10^-9
inicial<-10
final<-40
D<-inicial
//Proceso
Hacer
F<- (Q1 * Q2)/D^2
t<- t+3.3
mientras(t<= final)
//Resultado
Imprimir (F)
FinProceso
Tercera formula
Proceso MRUV
Escribir "****************"
Escribir "VELOCIDAD FINAL"
Escribir "****************"
//Declaracion
Definir Vf, Vi, g, t Como Real
Definir inicio, final Como Real
leer t
g<-9.8
inicial<-0
final<-80
Vi<-inicial
//Proceso
Hacer
Vf<- Vi + g * t
Vi<- Vi + 5
mientras(Vi<= final)
//Resultado
Imprimir (Vf)
FinProceso
Cuarta formula
Proceso MRUV
Escribir "****************"
Escribir "VELOCIDAD INICIAL"
Escribir "****************"
//Declaracion
Definir Vi1, Vi2, Vf, a, t Como Real
Definir inicio, final Como Real
leer Vf, t
inicial<-1
final<-10
a<-inicial
//Proceso
Hacer
Vi1<- Vf + (1/2) * a * t
Vi2<- Vf - (1/2) * a * t
a<- a + 0.25
mientras(a<= final)
//Resultado
Imprimir (Vi)
FinProceso