Составьте программы для расчета следующих выражений y=cos2x+sinx/4

Очевидно выражение такое: y = cos(2x)+sin(x/4)
Получим линейный алгоритм:

var x,y:real;
begin
  writeln('Введите Х');
  readln(x);
  y:=cos(2*x)+sin(x/4);
  writeln(y);
end.