Умножение вектора на число есть увеличение его длины.
Что соответствует по компонентному умножению его элементов.
1) <math>\lambda \mathbf{a}=\lambda \cdot a_i</math>

Алгоритм умножения вектора на число

procedure Mul(var R:TVectorN; A:TVectorN; B:Real);
var 
  i:Integer;
begin
 for i:=0 to ColumnsCount(A)-1 do
   R[i]:=A[i]*B;
end;

Входные параметры:

Вектор A.
Скаляр, реальное число B.

Выходные параметры:

Вектор R.

Примечание:
Входные параметры не проверяются. Память под вектор R должна быть выделена. Вектор R должен иметь число элементов вектора A.