Вывести на экран числа от -5 до 5 в прямом и

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

end.