Пожалуйста помогите найти решение задачи "Вычисление косинуса в Паскале"
Желательно сам текст программы, спасибо.

под словом вычисление косинуса можно понять многое
вычислить используя фунцкцию косинуса либо с помощью рекурентной формулы?

Вот тебе полный текст программы:

var
  x: real;
begin
  ReadLn(x);
  WriteLn(Cos(x))
end.