Опишите на языке или одном из языков программирования алгоритм получения из заданного целочисленного массива размером 30 элементов другого массива ,который будет содержать противоположные значения элементов первого массива

Var
  a, k: array [1..30] of integer;
  i: byte;

begin
  for i := 1 to 30 do
  begin
    a[i] := random(255);
    writeln(String.Format('a[{0}] => {1} |', i, a[i]));
  end;
  for i := 1 to 30 do
    k[i] := -1 * a[i];
  for i := 1 to 30 do
    writeln(String.Format('k[{0}] => {1} |', i, k[i]));
end.