Программа для решения корней квадратного уравнения с использованием дискриминанта на языке Паскаль

Если при некотором условии требуется выполнить определенную последовательность операторов, то их объединяют в один составной оператор. Алгоритм решения квадратного уравнения вам хорошо известен. Запишем соответствующую программу на языке Паскаль.