Diario de un programador. Anexo B: Códigos
Ejemplo uso GOTO: Sintaxis del uso de la instrucción goto. Es útil cuando se quiere salir de varios bloques anidados
C
Programa utilizado: Code Blocks 13.12
#include <stdio.h>
int main(void){
int i, x, z, ciclos = 0;
for(i = 0; i < 10; i++){
for(x = 0; x < 10; x++){
for(z = 0; z < 10; z++){
ciclos++;
if(i == 2 && x == 5 && z == 3){
goto salir;
}
}
}
}
salir:
printf("Se efectuaron %d ciclos\n", ciclos);
return 0;
}
//Escrito por Gustavo J. Cerda Nilo, diciembre 2015
EJEMPLO 2... También se pueden hacer bucles
#include <stdio.h>
int main(void){
int i = 0, numero;
printf("Ingresa un numero: ");
scanf("%d", &numero);
inicio:
i++;
printf("%d x %d = %d\n", numero, i, numero *i);
if(i < 10){
goto inicio;
}
return 0;
}
//Escrito por Gustavo J. Cerda Nilo, Agosto 2015
SMALL BASIC
Programa utilizado: Small Basic 1.1
contador = 0
inicio:
TextWindow.WriteLine(contador)
contador = contador + 1
If contador < 10 Then
Goto inicio
EndIf
'Escrito por Gustavo J. Cerda Nilo, diciembre 2015
EJEMPLO 2... para validar datos
inicio:
TextWindow.Write("Cual es tu edad? ")
edad = TextWindow.ReadNumber()
If edad >= 18 Then
If edad >=120 Then
TextWindow.WriteLine("La edad ingresada es muy alta")
Goto inicio
EndIf
TextWindow.WriteLine("Eres mayor de edad")
Else
If edad < 0 Then
TextWindow.WriteLine("La edad no puede ser un numero negativo")
Goto inicio
EndIf
TextWindow.WriteLine("Eres menor de edad")
EndIf
'Escrito por Gustavo J. Cerda Nilo, Agosto 2015
EJEMPLO 3... para crear un menu
inicio:
TextWindow.WriteLine("MENU")
TextWindow.WriteLine(" ")
TextWindow.WriteLine("1) Opcion A")
TextWindow.WriteLine("2) Opcion B")
TextWindow.WriteLine("3) Opcion C")
TextWindow.WriteLine("4) Salir")
TextWindow.WriteLine(" ")
TextWindow.Write("Ingresa una opcion ")
opcion = TextWindow.ReadNumber()
If opcion = 1 Then
TextWindow.Clear()
TextWindow.WriteLine("Estas en opcion A")
TextWindow.Pause()
TextWindow.Clear()
Goto inicio
elseIf opcion = 2 Then
TextWindow.Clear()
TextWindow.WriteLine("Estas en opcion B")
TextWindow.Pause()
TextWindow.Clear()
Goto inicio
elseIf opcion = 3 Then
TextWindow.Clear()
TextWindow.WriteLine("Estas en opcion C")
TextWindow.Pause()
TextWindow.Clear()
Goto inicio
elseIf opcion = 4 Then
TextWindow.Clear()
TextWindow.WriteLine("Hasta luego")
else
TextWindow.Clear()
TextWindow.WriteLine("Opcion no valida")
TextWindow.Pause()
TextWindow.Clear()
Goto inicio
EndIf
'Escrito por Gustavo J. Cerda Nilo, diciembre 2015
No hay comentarios:
Publicar un comentario