Вычисляемая последовательность чисел по формуле: 1\((sqrt(n^2 + 1) + sqrt(n^2 - 1 )) , где n=1,2,3...
10-11 класс
|
Определить при каком n два соседних числа будут отличаться друг от друга на величину не превосходящую Е.
Вычислить сумму М таких чисел начиная с К-ого.
var k, m, e, a, b, c: real;
n: integer;
begin
readln(e);
readln(k);
for n := 1 to 1000 do
begin
b := 1/((sqrt(sqr(n) + 1) + sqrt(sqr(n) - 1)));
if ((a - b > e) and (c <= k)) then
begin
m := m + a + b;
c := c + 1
end;
a := b;
end;
writeln(a);
end.
Как-то так вроде =)
Другие вопросы из категории
= 8 и
Х2 = 3 , записать
значение величины Y
Читайте также
2. В последовательности чисел сравнить, что больше сумма положительных или про-изведение отрицательных.
3. В последовательности чисел определить предпоследнее отрицательное число. (При решении введите дополнительную переменную для хранения предпоследнего отрицательного числа).
(Определить процедуру, распознающую НОД двух чисел)
«1», далее дважды подряд записывается предыдущая последовательность. Вот первые последовательности, созданные по этому правилу: (1) 1 (2) 111 (3) 1111111. Сколько раз встречается цифра «1» в седьмой последовательности?
Чему равен F3, если F7 = 2 и F