Составьте программу вычисления значения функции y по формуле y=cos (12x)+|x|, для которой значение аргумента x введите с клавиатуры.

Var
  x, y: real;

begin
  Write(Введите значение аргумента х: );
  Readln(x);
  y := cos(12 * x) + abs(x);
  Writeln(Значение функции cos(12x)+|x| равно , y)
end.

Тестовое решение:
Введите значение аргумента х: 2.152
Значение функции cos(12x)+|x| равно 2.92244414946246