Написать и отладить программу для табулирования функции y=ln (2×2 +3x-5) для xв интервале [1,05;2,10] с шагом 0.05- Pascal(Паскаль)

program test;
uses crt;
var 
    x, y :real;
begin
 x:=1.05;
    while x <= 2.10 do
     begin
        y:=ln(4*x + 3*x - 5);
        write(x:4:2,' ',y:4:2);
        writeln;
        x:=x+0.05;
     end;
readln;
end.