Program2.pas(12) : Нельзя преобразовать тип real к integerprogram formula12;const a =19.6

Program2.pas(12) : Нельзя конвертировать тип real к integer
program formula12;

const
a =19.6 ;
b =7.8 ;

var
y: real;
x: integer;

begin
x :=14.6 ;
repeat
x:= x + 0.1;
y :=sqrt((a+b*x)/(sqr(ln(x))));
write(' y=', y:4:2, ';')
until xgt;16



end.