Question

помогите с 10 паскалььь

Answer 1

я решил, Как понял

________________

var x,y:real;

begin

      readln (x);

      y:=sqr( Cos (x+3));

      writeln (y);

end.