Var x ,y: integer;
begin
for x:=-4 to 4 do
begin
y:=2*x*x*x-7*x;
writeln('При x = ', x, ' y = ', y);
end;
<span>end.</span>
На всякий случай сперва уточни название программы - не все они нуждаются в установке. В большинстве случаев нужно запустить установщик программы, которую нужно установить.