Выполнить вывод на экран всех чисел от -4 до 4 с

program zz1;
var i:integer; //заводим переменную для цикла
begin
for i:=-4 to 4 do //организуем перебор всех чисел от минус 4 до 4, в цикле параметр цикла возрастает на единицу автоматически
write(i, ); // выводим это число на экран в строку через пробел

end.