Помогите пожалуйста, очень прошу написать это ** языке паскаль cos^2 x^2

Question

Помогите пожалуйста, очень прошу
написать это на языке паскаль
cos^2 x^2

Answer 1

Program sqrcos;
  var x:real;
begin;
  read(x);
  write(sqr(cos(sqr(x))));
end.