в паскале
Пусть a, b, c коэффициенты квадратного уравнения. Проверить имеет ли уравнения корни. Если имеет, то вычеслить их, в противном случае вывести сообщение корней нет