(с клавиатуры ввести а=3, в=2, с=-4), вывести 2 корня Делать это в паскале абс
А подробнее насчет вывода можно? Чьи корни вывести?
любые
Var a,b,c:real; begin readln(a,b,c); a:=sqrt(a); b:=sqrt(b); c:=sqrt(c); print(a,b,c); end.