Как в паскале записать программу, решающее выражение 7 х²-2 (х-3) / х-3?

Проводится работа с операторами (если, то, иначе) и при написании вылезает ошибка 1001 "переменной не присвоено значение". Что делать, спасите?

Question

Информатика

Лилюся

4 ноября, 20:53

Как в паскале записать программу, решающее выражение 7 х²-2 (х-3) / х-3?

Проводится работа с операторами (если, то, иначе) и при написании вылезает ошибка 1001 "переменной не присвоено значение". Что делать, спасите?

+4

Ответы (1)

Знаете ответ?

Харитон · Answer 1

VAR

x, a, b: Integer;

y: Real;

Begin

WriteLn ('Введите x') ; ReadLn (x) ;

if x = 3 then begin

WriteLn ('Знаменатель равен 0!') ;

end else begin

a: = x - 3;

b: = 7 * x * x - a * 2;

y:=b / a;

WriteLn (y) ;

end;

end.