Срочно! Вводятся 3 числа a, b, c. d = b^2 - 4ac. Если d < 0, то вывод: корней нет. Если b > 0, то корни есть. Можете ещё пожалуйста составить схему)
Чтобы узнать чему равен дискриминант, после строчки else напиши: writeln ('d= ', d:4:2);