Var a,b,d,c: integer; begin d: =sqr(9)=4*a*c; if - вопрос №9876714940 от dsefanova 01.06.2020 09:15

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

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