Помогите найти ошибку в коде. Паскаль. Выбивает ошибку 106, т. е. что-то не так с readln.

program zad2;
uses crt;
var x, xn, xk, h, y: real;
begin clrscr;
writeln('‚ўҐ¤ЁвҐ §­ 祭Ёпя xn,xk,h');
readln (xn,xk,h);
x:=xn;
while (x