Тема: Помилка у коді
Такий код:
Program afs;
var a,b,h,x,y:real;
begin
    writeln('Введіть верхню та нижню границі табуляції');
    readln (a,b);
    writeln ('Введіть крок табуляції');
    readln (h);
    x:=a;
    while x<=b do begin
    y:=abs(exp(3*ln(x))-4.2*sqr(x))+cos(5*x)*sin(3*x);\\при введені данних виникає помилка в цій строчці
    x:=x+H
    writeln('x=',x,'y=',y);
end;
end.помилка виконання 207 за адресою 0000: 015c
Ось приклад в який треба записати на паскалі, у чому проблема?