1. вычислить корни квадратного уравнения ax²+bx+c=0? заданного коэффициентами а, b, с (предполагается, что а не равно 0 и что дискриминант уравнения неотрицательный). перевести в "паскаль"

eduardpiterskiy eduardpiterskiy    3   04.06.2019 23:10    0

Ответы
AkimMen AkimMen  01.10.2020 19:30
Var a,b,c,x1,x2,d:real;
begin
read(a,b,c);
d:=b*b-4*a*c;
x1:=(-b-sqrt(d))/(2*a);
x2:=(-b+sqrt(d))/(2*a);
writeln(x1,' ',x2);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика