Составить программку, которая меняет элементы массива на обратные по знаку, массив

program zz1;
const n = 5; // задаем количество чисел в массиве
var i:integer; // задаем переменную целого типа для цикла
m:array [1..n] of integer;
begin
for i:=1 to 5 do // организуем цикл, в котором введем с клавиатуры n заданных чисел в массив
read(m[i]);
for i:=1 to 5 do // организуем цикл, в котором число из массива умножим на -1, в итоге чего число в массиве поменяет символ на обратный
m[i]:=m[i] * (-1);
for i:=1 to 5 do
write(m[i], ); // выводим полученные числа из массива в строчку через пробел
end.