Паскаль var a,b,c,d,x1,x2: integer; begin a: =1; b: =2; c: =1; d: =b*b-4*a*c; if ( d< 0) then writeln ('действительных корней нет') else begin x1: =(b-sqrt(d))/(2*a); x2: =(b+sqrt(d))/(2*a); end; end. вопрос, что я делаю не так, если выбивает эту ошибку: program2.pas(9,6): нельзя преобразовать тип real к integer
2) в программе нет вывода корней (write(x1,' ',x2)