Программа Паскаль: Найти все натуральные корни, меньше 100, уравнения x^4-10x^3+38x^2-79x+70=0 Пожалуйста, помогите!
Программа Паскаль:
Найти все натуральные корни, меньше 100, уравнения
x^4-10x^3+38x^2-79x+70=0
Пожалуйста, помогите!
Гость
Ответ(ы) на вопрос:
Гость//PascalABC.NET 3.2 сборка 1318
Var
x:integer;
begin
for x:=1 to 99 do
if power(x,4)-10*power(x,3)+38*sqr(x)-79*x+70=0 then writeln(x);
end.
Не нашли ответ?
Похожие вопросы