Паскаль

[Evgenii_95]

Для заданного Х в последовательности вида sinX,Sin(sinX)),sin(sin((sinX))-найти первое число меньшее по модулю 0,01 в паскале

var x:real;
begin
readln(x);
x:=sin(x);
while abs(x)>0.01do
x:=sin(x);
writeln(x);
end.

сам разобрался)))

Помогите с этой
ПАСКАЛЬ
найти наименьший номер элемента последовательности, для которого выполняется условие: |a[n]-a[n-1]|<0,1.Если последовательность а[n] имеет вид.
a[n-1]=a[n]+2/a[n], a[1]=1

[Аватар]

a[n-1]=a[n]+2/a[n], a[1]=1

Вид последовательности оригинальный: предыдущий зависит от следующего и задан 1-ый. Загадка на засыпку - вычисли 2-ой