ПАСКАЛЬ !!! Знайти найменший номер члена послiдовностi, для якого виконує- ться умова |an − an−1| меньше e. Вивести на екран цей номер i всi еле- менти ai , де i = 1, 2, . . . , n: an =0.5*(an−1+an−2) a1 = 1, a2 = 2 an =(n^ln...

ПАСКАЛЬ !!! Знайти найменший номер члена послiдовностi, для якого виконує- ться умова |an − an−1| < e. Вивести на екран цей номер i всi еле- менти ai , де i = 1, 2, . . . , n: an =0.5*(an−1+an−2) a1 = 1, a2 = 2 an =(n^ln n)/(ln n)^n
Гость
Ответ(ы) на вопрос:
Гость
var   a, p: real;   n, i: integer; begin   p := 1;   readln(a, n);   for i := 0 to (n - 1) do     p := p * (a + i);   writeln(p); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы