Значения функции - Turbo Pascal

Формулировка задачи:

Здравствуйте, помогите разобраться с задачей. Не могу понять как должна выглядеть структура кода, а конкретно как вводить: Х(нач)= 1.2; Х(кон)= 4.7; шаг=0.3; Пока я написал следующее:

var x,y,t,n,z: real;
 
begin
 t:= 0.5;
 n:= 1;
 z:= 0.035;
 
 readln(x);
 readln(z);
 
 lg(x):= ln(x)/ln(10);
 
end.

Ошибка в строке 11: "Ошибка 3: Неизвестный идентификатор."

Решение задачи: «Значения функции»

Листинг программы

uses crt;
const xn=1.2;
      xk=4.7;
      h=0.3;
      z=0.035;
var x,y:real;
begin
clrscr;
x:=xn;
while x<xk do
 begin
  y:=(x+z+0.5)/(1+x*x*z*z)+ln(x*x)/ln(10);
  writeln('x=',x:4:1,' y=',y:6:3);
  x:=x+h;
 end;
readln
end.

Объяснение кода листинга программы

В этом коде:

Используется библиотека CRT (буферизация ввода-вывода).
Задаются константы: xn=1.2; xk=4.7; h=0.3; z=0.035.
Объявляются переменные: x, y (тип real).
Очищается экран.
Переменная x инициализируется значением xn.
Запускается цикл while, который выполняется до тех пор, пока значение переменной x меньше xk.
Внутри цикла вычисляется значение переменной y по формуле (x+z+0.5)/(1+xxzz)+ln(xx)/ln(10).
Выводится на экран значение переменных x и y с указанной точностью (x:4:1 и y:6:3).
Значение переменной x увеличивается на h.
После окончания цикла программа ожидает ввода пользователя с помощью функции readln.
Программа завершается.