Написать программу ** языке Паскаль

Question

Написать программу на языке Паскаль

---

Answer 1

Var x:integer;

Begin

x:=-1;

while x<=12 do</p>

begin

writeln('x = ',x,'; y = ',(4*x*x*x*x+cos(x)-5)/(6*x*x*x+2));

x:=x+0,4;

end;

End.