Question

9ый класс. На Паскале, пожалуйста.

Answer 1

uses crt;

var

x,y:real;

begin

x:=-1;

while ( x <= 4) do

begin

 x:= x + 0.3;

 y:= (x - 3)/ (x * x + 2);

 if ((y >= -1.5) and (y <=-1)) then writeln(y);

end;  

end.