Информатика, вопрос задал zapuskalova03 , 7 лет назад

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

Ответы на вопрос

Ответил korandnik2
0

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

Новые вопросы