Напишите программу, которая выводит в порядке возрастания все корни уравнения ax3+bx2+cx+d=0 на отрезке [0,1000]. Если решений к данному уравнению не существует, то ничего выводить не нужно. Вводные данные: на четырех строках даны числа коэффициенты уравнения A, B, C и D.

Исходные данные: на разных строках вывести все корни уравнения, если таковые существуют.

язык программирования: паскальvara, b, c, min : integer; beginreadln (a); readln (b);   readln (c);   min : = a; if b < min thenmin : = b; if c < min thenmin : = c; writeln (min); end.

n = 64 - 32 = 32

i = log₂ 32 = 5 бит

количество вопросов, которые нужно задать равно 5

a-возраст cаши

b– возраст маши

program r;

var a,b: integer;

begin

readln(a,b);

if a=b then writeln («ровесники»)else writeln( «неровесники»)

end.

файл в паскале должен иметь расширение конечно же а)