Массив нужно заполнить именно так:

X = [12 9 6 3 0 -3]

Какой оператор надо поместить в тело цикла

for k:=1 to 6 do begin

...

end;