создать программу на языке Pascal для вычисления следующего арифметического выражения.Пожалуйста посчитайте пж,заранее спасибо)

begin
  var (a,b):=ReadReal2('Введите a и b черезх пробел:');
  var y:=Sqrt(7.1*(a+Sqr(b*b)))/(9.2*Abs(3*a*a-b));
  Writeln('y=',y)
end.