Найти значение функции y=√(x-1)/(sin 1/x)в промежутке [1.2; 2] с шагом 0.1

Const a=1.2; b=2; h=0.1;
var x,y:real; n,i:integer;
begin
x:=a-h;
n:=round((b-a)/h)+1;
writeln(' №   x      y');
for i:=1 to n do
begin
 x:=x+h;
 y:=sqrt((x-1)/sin(1/x));
 writeln(i:2,'  ',x:3:1,' ',y:8:4);
 end;
end.

Результат:
 №   x      y
 1  1.2   0.5198
 2  1.3   0.6567
 3  1.4   0.7814
 4  1.5   0.8992
 5  1.6   1.0127
 6  1.7   1.1232
 7  1.8   1.2316
 8  1.9   1.3385
 9  2.0   1.4442