Циклы

[dinamit768]

Люди кто может помогите написать программы. Просто очень надо. Препод мало объясняеет, но много просит.

1. Дано вещественное число X и целое число N (> 0). Вывести X – X^3/3! + X^5/5! – ... + (–1)^N*X^(2N+1)/(2N+1)! (N! = 1•2•...•N). Полученное число является приближенным значением функции sin в точке X.

2. Дано число D (> 0). Последовательность чисел AN определяется следующим образом: A[1] = 1,A[2]=2,A[n]=(A[n–2]+ A[n–1])/2, n = 3, 4, ... Найти первый из номеров K, для которых выполняется условие |A[k]-A[k–1]| < D, и вывести этот номер, а также числа A[k–1] и A[k].

3. Дано вещественное число X (|X| < 1) и целое число N (> 0). Вывести X – X^2/2 + X^3/3 – ... + (–1)^(N–1)*X^N/N. Полученное число является приближенным значением функции ln в точке 1+X.

Все это делается в программе Borland Developer Studio-Console Application или в Delphi-Console Application