Напишите программу вычисления выражение с использованием наименьшего количеством операторов x 1,2 = b +-√b^2-4ac/2a

Var x, b, a, c :real;beginread(a, b, c);x:= 1.2;x:= b + -sqrt(sqr(b))- 4*a*c/2*a;writeln(x);end.