Aprende a codificar la estructura de repetición FOR en distintos lenguajes como C++, DELPHI, JAVA, y VISUAL BASIC con este curso de informática básica en el cual mediante ejemplos te ayudaremos a entender cómo hacerlo.
El uso de FOR es muy importante a la hora de hacer contadores porque es mucho más fácil que el uso de contadores en WHILE o DO WHILE ya que esta estructura nació para crear contadores en el mundo de la programación.
Vamos a plantarnos dos ejemplos uno básico y sencillo en el cual usaremos el contadoR FOR y otro medio complejo. Los dos ejemplos lo escribiremos en los tres lenguajes C++, DELPHI y VISUAL BASIC.
Empezaremos haciendo un pequeño contador en la sentencia FOR y que nos muestre los números en un mensaje:
Empecemos con el lenguaje C++:
INT INICIO = 0, FIN = 10;
FOR(INT COUNTER = INICIO; COUNTER <= FIN; COUNTER ++){
SHOWMESSAGE("NUMERO: " + INTTOSTR(COUNTER));
}
Ahora vamos a hacer lo mismo con el lenguaje DELPHI:
INICIO:= 0;
FIN:= 10;
FOR COUNTER:= INICIO TO FIN - 1 DO
BEGIN
SHOWMESSAGE(' NUMERO ' + INTTOSTR(COUNTER));
END;
END;
Recordemos que en el código de DELPHI tienen que estar declarados las variables de la siguiente forma:
VAR
INICIO, FIN, COUNTER: INTEGER;
Ahora el mismo código en VISUAL BASIC:
DIM INICIO AS INTEGER
DIM FIN AS INTEGER
DIM COUNTER AS INTEGER
INICIO = 0
FIN = 10
FOR COUNTER = INICIO TO FIN
MSGBOX("NUMERO " + CSTR(COUNTER))
NEXT
Bueno ahora vamos a escribir otro ejemplo más complejo:
Encontrar el número 15 en una matriz de 10 por 10 elementos usando la sentencia FOR:
Empecemos con C++:
INT MATRIZ[10][10];
FOR(INT COL = 0; COL < 10; COL++){
FOR(INT FILA = 0; FILA < 10; FILA++){
IF(MATRIZ[FILA][COL]==15)
SHOWMESSAGE("ENCOTRADO EN: FILA:"+INTTOSTR(FILA)+" COL:"+INTTOSTR(COL));
}
}
Ahora hagamos el mismo ejercicio en DELPHI:
FOR COL := 0 TO 10 - 1 DO
BEGIN
FOR FILA := 0 TO 10 - 1 DO
BEGIN
IF (MATRIZ[FILA,COL] < 15 ) THEN
BEGIN
SHOWMESSAGE('ENCOTRADO EN: FILA:'+INTTOSTR(FILA)+' COL:'+INTTOSTR(COL));
END;
END;
END;
Ahora hagamos lo mismo con el lenguaje VISUAL BASIC:
DIM MATRIZ(10, 10) AS INTEGER
FOR COL = 0 TO 10
FOR FILA = 0 TO 10
IF MATRIZ(FILA, COL) = 15 THEN
MSGBOX("ENCONTRADO EN FILA:" + CSTR(FILA) + " COL:" + CSTR(COL))
END IF
NEXT
NEXT
Bueno espero que te haya servido de mucho.
Cómo usar la estructura de control IF & ELSE en distintos lenguajes
4 alumnos En este curso aprenderemos a usar la estructura de control IF & ELSE... [22/12/11] |
Estructura de control IF en distintos lenguajes para distintos programas
5 alumnos Curso de informática en el cual aprenderás usar la estructura de control IF ,... [22/12/11] |
Estructura de selección múltiple Switch en distintos lenguajes. Informática
17 alumnos Curso de informática en el cual aprenderemos a codificar la estructura de selección... [23/12/11] |