Написать в Pascal ABC ТАБЛИЦУ УТРОЕННЫХ ЗНАЧЕНИЙ ОТ -4 ДО 4

Решение задачки:
Кон написан в программке PascalABC:
var a1, a2, i: integer;
begin
a1:=-4;
writeln(Ответ в виде таблицы:);
for i:=1 to 5 do //Запускаем цикл.
begin
a2:=3*a1; //Утраиваем значение.
writeln(a1, , a2); //Выводим на экран начальное и утроенное значения.
a1:=a1+2;
end;
end.