Cоставить программу для решения квадратного уравнения - вопрос №20376082 от 11cat13 14.11.2020 08:38

Question

Информатика: Cоставить программу для решения квадратного уравнения ax^2+bx+c=0

11cat13 · Answer

var a,b,c,d:real;beginreadln(a,b,c);d:=sqr(b)-4*a*c;if d 0 then writeln( Net kornei );if d=0 then writeln( x= ,-b/(2*a));if d 0 then writeln( x1= , (-b-sqrt(d))/(2*a), x2= ,(-b+sqrt(d))/(2*a));end....