Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if - вопрос №94019876037 от ozilpro228 17.02.2020 03:35

Question

Информатика: Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if d 0 then cообщить; нет; решения; x1: =(-b+sqrt(d))/2*a; write ; сообщить; результат; end где ошибка в 4 строке?

ozilpro228 · Answer

Двоеточие, скобочка?...

Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if d< 0 then cообщить; нет; решения; x1: =(-b+sqrt(d))/2*a; write ; сообщить; результат; end где ошибка в 4 строке?

Var a,b,d,c: integer; begin d: =sqr(9)=4ac; if d< 0 then cообщить; нет; решения; x1: =(-b+sqrt(d))/2*a; write ; сообщить; результат; end где ошибка в 4 строке?