Паскаль выдаёт ошибку: Вещественное деление на 0!

Question

Паскаль выдаёт ошибку: Вещественное деление на 0!

ВЛАД луценко Знаток (375), на голосовании 9 лет назад

Program Z_1;

Var x,r,a,b,h,y:Real;

Begin

x:=a;

While x<=b do

Begin

r:=EXP(x)*EXP(y)+EXP(-x)*EXP(-y)/x*y;

Writeln ('x','r=');

x:=x+h;

END;

END.

Answer 1

Да не введены остальные переменные, в частности У, а также Н и В