Разработать программу вычисления значений заданных функций для произвольных значений исходных данных. Выполнить тестовый расчет и расчет для заданных значений исходных данных.

// PascalABC.NET 3.2, сборка 1381 от 04.02.2017// Внимание! Если программа не работает, обновите версию!begin  (var a,var g):=(1.45,0.2);  var x:=Ln(a+1/a);  var y:=sin(x+a)*(1+Sqr(x+a))/(g*Sin(a));  Writeln('x=',x,', y=',y)end.Результатx=0.760644681664142, y=23.7854781268528