Operaciones aritméticas entre dos vectores

 Explicación

En este ejemplo utilizaremos la operación aritmética de Suma y que los 2 vectores son de 8 posiciones.

Paso 1. Para sumar dos vectores al primero le llamaremos a y al segundo b. Para sumarlos primero tendríamos que leer los dos vectores para después sumarlos verdad, y para leer cada uno, tendríamos que usar un ciclo para cada uno así:

For i:=1 to 8 do

readln(a[i]);                            {Estamos leyendo el vector a}

For i:=1 to 8 do

readln(b[i]);                            {Estamos leyendo el vector b}

Paso 2. Ya leímos los dos vectores, ahora queremos sumar el vector a de posición 1—–> a[1] con el vector b de posición 1—–> b[1] y esta suma ocupamos guardarlo en otro vector que llamaremos r de posición 1 ——> r[1 ]  y luego a[2]+b[2]=r[2] y después a[3]+b[3]=r[3] y así sucesivamente hasta sumar las 8 posiciones de los vectores.

Y para hacer la suma y guardarla en un resultado ocupamos un ciclo y quedaría así:

For i:=1 to 8 do

r[i]:=a[i]+b[i];

{Primero i vale 1 aquí estamos diciendo que el vector rde posición 1 —-> r[1] es igual a la suma del vector a en posición 1 —a[1] mas el vector b en posición 1 —-> b[1]. Y luego los de posición 2 y los de posición 3 etc. hasta llegar a los 8}.

Paso 3. Ya que tenemos los valores resultantes guardados en el vector r solo falta imprimirlos y para esto ocupamos otro ciclo

For i:=1 to 8 do

writeln(r[i]);

Y si quieren hacer resta, multiplicación o división es lo mismo solo cambien el operador en el Paso 2.

Resta

For i:=1 to 8 do

r[i]:=a[i] - b[i];

Multiplicación

For i:=1 to 8 do

r[i]:=a[i] * b[i];

División

For i:=1 to 8 do

r[i]:=a[i]  / b[i];

ó

For i:=1 to 8 do

r[i]:=a[i] div b[i];