Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if d - вопрос №9875812940 от koshkanet69 19.09.2021 22:11

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 строке?

koshkanet69 · 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 строке?