En muchas ocasiones se conoce de antemano el número de veces que se desean ejecutar las acciones del cuerpo del bucle. Cuando el número de repeticiones es fijo, lo más cómodo es usar un bucle “para”, aunque sería perfectamente posible sustituirlo por uno “mientras”.
La estructura “para” repite las acciones del bucle un número prefijado de veces e incrementa automáticamente una variable contador en cada repetición.
Ejemplo en Pseint
escribir "---------------" escribir "Formulas Ramdon" escribir "---------------" escribir "" escribir "----------------------------------" escribir "1. Impedancia de una Linea Coaxial" escribir "2. Formula de Ultrasonido" escribir "3. Formula Ft=Fo*cos(W*T)" escribir "4. Formula R<-(Z2-Z1)/(Z2+Z1)" escribir "----------------------------------" escribir ""
leer opciones escribir ""
Segun opciones Hacer 1:
definir D1,D2,K,Z Como Real DEFINIR INICIAL ,FINAL COMO ENTERO escribir "Escribir Diametro Menor" LEER D1 escribir "" K=0.0175 INICIAl=110 FINAL =500
Para D2<-INICIAL Hasta FINAL Con Paso 15 Hacer z<-138* ln(D2/D1)*(1/rc (k)) escribir "z :",z; Fin Para
2: definir Pzt,A,V,T,K,Z,INICIAL2,FINAL2 Como Real DEFINIR INICIAL1,FINAL1 COMO ENTERO escribir "Escribir Amplitud" LEER A escribir "" escribir "Escribir Velocidad" LEER V escribir "" K=0.0175 INICIAL1 =50 FINAL1 =100 INICIAL2 = 1 FINAL2=10
Para Z<-INICIAL1 Hasta FINAL1 Con Paso 5 Hacer escribir "" escribir "-----------------------------------------------------------------" ESCRIBIR "Para una Impedancia en Z: ",Z escribir "-----------------------------------------------------------------" escribir ""
Para T<-INICIAL2 Hasta FINAL2 Con Paso 1.5 Hacer Pzt<-A*COS(2*PI*V*T + K*Z) Escribir "EL ULTRA SONIDO: ",Pzt," Para Z: ",z," y tiempo:",t; Fin Para
Fin Para
3:
DEFINIR Ft,Fo,W,T COMO REAL ESCRIBIR "Escribir Fo" leer Fo ESCRIBIR "Escribir W" leer W inicial= 10 final= 20 t=inicial Para T<-inicial Hasta final Con Paso 2 Hacer Ft=Fo*cos(W*T) Escribir "LA FRECUENCIA ES: ",FT ," Para Fo:",Fo," y el T: ",t; FinPARA 4: definir R,Z1,Z2 Como Real DEFINIR INICIAL,FINAL COMO ENTERO escribir "Ingresar Z2" LEER Z2 escribir ""
INICIAL =100 FINAL =900
Para Z1<-INICIAL Hasta FINAL Con Paso 10 Hacer R<-(Z2-Z1)/(Z2+Z1) Escribir "La Rezonancia es: ", R; Fin Para
De Otro Modo: escribir "ya fue" Fin Segun FinProceso
Comentarios