решить(поделится идеей решения) данной задачи Кубическое уравнение
(Время: 1 сек. Память: 16 Мб Сложность: 56%)
Напишите программу, которая будет искать все целые X, удовлетворяющие уравнению A*X3 + B*X2 + C*X + D = 0, где A, B, C, D – заданные целые коэффициенты.
Входные данные
Во входном файле INPUT.TXT записаны четыре целых числа: A, B, C, D. Все числа по модулю не превышают 2×109.
Выходные данные
В выходной файл OUTPUT.TXT выведите сначала количество различных корней этого уравнения в целых числах, а затем сами корни в возрастающем порядке. Если уравнение имеет бесконечно много корней, то следует вывести в выходной файл одно число -1 (минус один).
Ссылка на сайт: https://acmp.ru/index.asp?main=task&id_task=257
Мой код: https://pastebin.com/ajaexiek
Я ищу делители числа d и по ним отбираю корни, так же я рассмотрел все случаи когда коэффициенты равен(равны) нулю
2.Мама обрадовала Петю: он совсем не ожидал получить компьютер на день рождения.
3. Учительница сказала, что сегодня мы будем работать на компьютере.
4. Паскаль- самый сложный язык в программировании на компьютере.
5. Вова обожал играть в видеоигры на компьютере.
6. "Ребята, сегодня наш класс пойдёт смотреть в технический музей на первые компьютеры"- сказала учительница.
7. Бабушка удивилась, что Катенька так быстро печатает на компьютере.
8. Настя была опечалена: из-за сломанного usb-порта компьютер не воспринимал съемный носитель.
9. Первые компьютеры были очень большими.
10. Милана очень хотела новый компьютер, но папа посчитал нужным подарить ей книги.
var a:array[1..n] of integer;
i,s:integer; sr:real;
begin
Randomize;
writeln('Массив:');
for i:=1 to n do
begin
a[i]:=random(21);
write(a[i]:3);
end;
writeln;
s:=0;
for i:=1 to n do s:=s+a[i];
sr:=s/n;
writeln('Среднее арифметическое = ',sr:6:2);
writeln('Номера элементов, больших среднего арифметического:');
for i:=1 to n do
if a[i]>sr then write(i:3);
writeln;
end.
Пример:
Массив:
9 19 14 8 7 10 5 10 6 14 15 2 11 17 13
Среднее арифметическое = 10.67
Номера элементов, больших среднего арифметического:
2 3 10 11 13 14 15