Quick Basic 4.5 – Capítulo 06 – Arrays

Introducción

Un array es una estructura de datos que almacena una colección de elementos del mismo tipo bajo un solo nombre. Cada elemento en un array se identifica mediante un índice numérico, comenzando desde 0 para el primer elemento. Los arrays son útiles para organizar y manipular datos de manera eficiente.

2. Declaración y Dimensionamiento de Arrays

En QuickBASIC, se pueden declarar arrays utilizando la siguiente sintaxis:

DIM nombre_array(tamaño)

Donde nombre_array es el nombre del array y tamaño es el número de elementos que contendrá. Por ejemplo:

DIM miArray(10)

3. Acceso y Modificación de Elementos

Los elementos de un array se acceden utilizando el nombre del array seguido de un índice entre paréntesis. Por ejemplo:

miArray(0) = 5

Esto asigna el valor 5 al primer elemento del array miArray.

4. Recorriendo Arrays

Para recorrer un array, se puede usar una estructura de bucle, como el bucle FOR, para iterar a través de los índices. Por ejemplo:

FOR i = 0 TO 10
    PRINT miArray(i)
NEXT i

Esto imprimirá cada elemento del array miArray.

5. Matrices

Una matriz es un array bidimensional, es decir, un conjunto de elementos dispuestos en filas y columnas. Se pueden declarar matrices de la siguiente manera:

DIM matriz(fila, columna)

6. Arrays Multidimensionales

QuickBASIC permite declarar arrays con más de dos dimensiones. Por ejemplo:

DIM matriz3D(x, y, z)

7. Ejercicios Resueltos

Ejercicio 1: Suma de Elementos

DIM numeros(4)
FOR i = 0 TO 4
    INPUT "Ingrese un número: ", numeros(i)
NEXT i

total = 0
FOR i = 0 TO 4
    total = total + numeros(i)
NEXT i

PRINT "La suma de los números es: "; total

Ejercicio 2: Matriz Transpuesta

DIM matriz(2, 2)
FOR i = 0 TO 2
    FOR j = 0 TO 2
        INPUT "Ingrese el elemento ("; i; ","; j; "): ", matriz(i, j)
    NEXT j
NEXT i

PRINT "Matriz original:"
FOR i = 0 TO 2
    FOR j = 0 TO 2
        PRINT matriz(i, j);
    NEXT j
    PRINT
NEXT i

PRINT "Matriz transpuesta:"
FOR i = 0 TO 2
    FOR j = 0 TO 2
        PRINT matriz(j, i);
    NEXT j
    PRINT
NEXT i

Ejercicio 3: Búsqueda en Matriz

DIM matriz(2, 2)
FOR i = 0 TO 2
    FOR j = 0 TO 2
        INPUT "Ingrese el elemento ("; i; ","; j; "): ", matriz(i, j)
    NEXT j
NEXT i

INPUT "Ingrese el valor a buscar: ", buscar

encontrado = 0
FOR i = 0 TO 2
    FOR j = 0 TO 2
        IF matriz(i, j) = buscar THEN
            PRINT "Valor encontrado en la posición ("; i; ","; j; ")"
            encontrado = 1
        END IF
    NEXT j
NEXT i

IF encontrado = 0 THEN
    PRINT "Valor no encontrado en la matriz."
END IF

8. Conclusiones

En este capítulo, hemos cubierto los conceptos básicos de trabajar con arrays en QuickBASIC 4.5. Aprendiste cómo declarar, dimensionar, acceder y modificar elementos en arrays, así como cómo recorrer matrices y trabajar con arrays multidimensionales.