Multiplicación de vectores en un stringgrid
 

Hola amigos... le doy gracias al foro otra vez por permitir que yo pregunte y a saber todas las cosas que yo no se... Miren necesito hacer un programa con vectores y trata de multiplicarlos. La sintaxis de un vector es esta ej. vec: array [1..100] of integer; ... y todo en un stringgrid ej. y sumar los resultados de lo multiplicado.El resultado puede salir en un showmessag


1 | 2 =2
2 | 5 =10
6 | 3 =18

Sumatoria total 30

No entiendo para qué quieres el StringGrid. No deberíamos de confundir el manejo de datos con su representación visual.

Lo que tú buscas -al menos a juzgar por el magro ejemplo que pones- es el producto punto o escalar de dos vectores:

Entonces, lo primero es que te plantees como representar cada vector, y para ello lo más adecuado es un array:

Código Delphi [-]
const
  DIM = 100;

type
  TVector = array[1..DIM] of Integer;

La definición que pongo arriba del producto escalar te lleva de la mano a su implementación:

Código Delphi [-]
procedure ProductoEscalar(A, B: TVector): Integer;
var
  I: Integer;

begin
  Result := 0;

  for I := 1 to DIM do
    Result := Result + A[i]*B[i];
end;

Ya después si quieres, puedes preocuparte por cosas como dónde mostrar los vectores y el resultado.

// Saludos