Y=sinx-x x=b*sin2a язык паскаль составте программу

Var a,b,x,y:real;
Begin
Writeln('vvedi a,b ');
Readln(a,b);
X:=b*sin(2*a);
Y:=sin(x)-x;
Writeln('x=',x,'y=',y);
Readln;
End.