sin(x)^2+cos^2(x)= 1?

я говорю к тому, что в условии которое дано sin(x)^2+cos^2(x)= 1 имеется в виду, что не синус в квадрате , а икс

т.е. как раз нужно так записать sin(sqr(x))+sqr(cos(x))=1

смотри Sin(x)^2 аргумент x в скобках,а ^2 скорее всего к синусу относится

тогда зачем он написал с косинусом по подобию не написал

короче, автор вопроса уже сам разберется, где нужно квадрат ставить. программа жене сложная.

var 
 x:real;
begin 
 readln(x); 
 if sqr(sin(x))+sqr(cos(x))=1 then 
  writeln('Верно') 
 else 
  writeln('Не верно');
end.