В какой строчке допущена ошибка в программе, написанной ** языке PascalABC? Программа...

Question

В какой строчке допущена ошибка в программе, написанной на языке PascalABC? Программа должна высчитывать корни квадратного уравнения при заданных значениях коэффициентов a, b, c.
1) program KvadrUravn;
2) var;
3) a, b, c, d, x1, x2: real;
4) begin;
5) readln (a, b, c);
6) d := b * b - 4 * a* c;
7) if d >= 0 then begin
8) if d <> 0 then begin
9) x1 := (b + sqrt(d)) / (2 * a);
10) x2 := (-b + sqrt(d)) / (2 * a);
11) writeln('x1 = ', x1:4:2, ', х2 = ', х2:4:2);
12) end
13) else begin
14) x1 := -(b / 2 * a);
15) writeln ('x = ', x1:4:2);
16) end;
17) end
18) else begin
19) writeln ('Решений нет!');
20) end;
21) end.

А) 5 б) 7 В)8 Г) 9

Answer 1

1. В строке 2 после var не должна стоять точка с запятой - это синтаксическая ошибка.
2. В строке 4 после begin точка с запятой лишняя, но это допустимо.
3. В строке 9 формула x1 := (b + sqrt(d)) / (2 * a); записана неверно, должно быть x1:=(-b-sqrt(d))/(2*a); - ошибка при задании формулы
4. В строке 11 в контексте х2:4:2 указана русская х вместо латинской - это синтаксическая ошибка.

Из перечисленных вариантов строк с ошибками подходит только Г) 9 - это и должен быть ответ.

Ответ: Г) 9