ПАСКАЛЬ !!! Знайти найменший номер члена посл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.
Не нашли ответ?
Похожие вопросы