Помогите с 10 паскалььь
я решил, Как понял
________________
var x,y:real;
begin
readln (x);
y:=sqr( Cos (x+3));
writeln (y);
end.