Помогите, пожалуйста!!!)) Не могу найти ошибку в программе, только начали изучать паскаль.


program zadanie;

uses crt;

var x,v,a,f,d:integer;

y:real;

begin

clrscr;

writeln ('vvedite x,v,a,f,d');

readln (x,v,a,f,d);


y:=(exp((2+x)*ln(cos(v-sqr(a)*a)))*(sqrt((sqr(sqr(sin(exp((x*v)*ln(v)))))*(sin(exp(
(x*v)*ln(v))))+f*d)/(sin(5*x)/cos(5*x)+(sqrt(sin(v*v))));



writeln(y= ', y);

readln;

end.
 
 

Большое спасибо за решение! Учительница вообще ничего не объясняет(

Наша тоже не объясняла, как-то само выучилось, а вообще можно попробовать курсы смотреть, если инет позволяет, а если нет, то читать что-нибудь, но это так, если желание есть)