kmelnuk5
29.06.2022 11:22

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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
АленаКамарова
03.10.2020 18:49
//Pascal ABC.NET 3.1 сборка 1256

Var
 y,a,b,c,d:real;
begin
read(a,b,c,d);
range(0,1000).where(x -> a*power(real(x),3)+b*sqr(x)+c*x+d=0).Reverse.Print;
end.

Пример ввода:
0
-1
1
0
Пример вывода:
1 0
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота