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

// 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