Question

Написать программу в Паскаль: cos (x)^2

Answer 1

Ответ:

var z:integer;

Begin

readln(z);

write((1 + cos(2 * sin(1 / z))) / 2);

End.

Объяснение: