Ответы
Ответ дал:
1
var c: real;
begin
readln(a);
readln(b);
c:=b*b-4*a*c/sqrt(2*a+3*b);
writeln(c);
end.
shushka246:
если можно лучший ответ
begin
ReadLn(a);
ReadLn(b);
ReadLn(c);
d:=b*b-4*a*c/Sqrt(2*a+3*b);
WriteLn(d);
end.
Вас заинтересует
1 год назад
1 год назад
2 года назад
7 лет назад
7 лет назад
8 лет назад