Что значит в паскале встречено else а ожидался оператор? и как это исправить?

Чаще всего это означает, что ты между then и else умудрился воткнуть несколько операторов. Тогда как по правилам Pascal там может быть только один оператор (но это может быть составной оператор, содержащий внутри себя другие операторы).

Например, поставил точку с запятой, которая в Pascal является РАЗДЕЛИТЕЛЕМ операторов и потому создаёт дополнительный пустой оператор при использовании перед else и end.

P.S. В твоём случае между then и else множество операторов - потому их надо оформить в виде единственного составного оператора: then begin {6 строк твоего кода} end else.

может if забыл

формулы неправильны, надо .../(2*a) и еще d>=0