5. Применяем оператор условного ветвления программы IF и переменные типа REAL (действительное число). Извлекаем квадратный корень с помощью процедуры-функции Sqrt из модуля Math. Пишем программу для решения квадратных уравнений.
https://youtu.be/omq0hJ1EIjU