Паскаль. Для заданного X в последовательности вида sinX, sin(sinX)).sin(sin(sinX)),...найти первое число,меньше по модулю 0,01.
Var x:integer; begin readln(x); x:=sin(x); while abs(x)>0.01do x:=sin(x); writeln(x); end.
В Pascal напиши к задаче подробные комментарии.