Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if d - вопрос №9875812940 от alinakozina879 23.03.2020 14:12

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

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