Входные данные вводятся 4 числа: a, b, c и d. решить для паскаля. выходные данные найдите все целые решения уравнения ax3 + bx2 + cx + d = 0 на отрезке [0,1000] и выведите их в порядке возрастания. если на данном отрезке нет ни одного решения, то ничего выводить не нужно.

denissss2222 denissss2222    1   16.09.2019 18:20    104

Ответы
Ангелочек319 Ангелочек319  07.10.2020 20:16
Var  a,b,c,d:real;  x:longint;beginreadln(a,b,c,d);  for x:=0 to 1000 do     if abs(a*x*x*x+b*x*x+c*x+d)<=1e-7 then writeln(x);end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика