Даны натуральное число n и вещественное число х. Составить программу для вычисления:y=sinx+sin sinx+sin sin sin x+sin sin sin …..sinx — Pascal(Паскаль)

uses crt;
var x,y:real;
    n,i:integer;
begin
clrscr;
write('x=');readln(x);
write('n=');readln(n);
y:=sin(x);
for i:=2 to n do
y:=y+sin(y);
write('Y=',y:0:4);
readln
end.