На языке паскаль надо вычислить tg x + sin9x - |a+x|,

// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

// Внимание! Если программа не работает, обновите версию!

begin

 var (x, a) := ReadReal2('Введите через пробел х и а:');

 Print(Tan(x) + Sin(9 * x) - Abs(a + x))

end.

Var x, a, out: real;

begin
writeln("Введите x,a: ");
readln(x, a);
out := sin(x)/cos(x)+sin(9*x)-abs(a+x);
writeln("Результат: ", out);
end.