Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.50/8: Рейтинг темы: голосов - 8, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 28.01.2011
Сообщений: 6

Найти первый из номеров K, для которых выполняется условие

28.01.2011, 20:42. Показов 1609. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите решить задачу!!!плиз
Дано число D (> 0). Последовательность чисел AN определяется следующим образом: A1 = 2, AN = 2 + 1/AN–1, N = 2, 3, ... Найти первый из номеров K, для которых выполняется условие |AK – AK–1| < D, и вывести этот номер, а также числа AK–1 и AK.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
28.01.2011, 20:42
Ответы с готовыми решениями:

Найти первый из номеров K, для которых выполняется условие
Дано число D (&gt; 0). Последовательность чисел AN определяется следующим образом: A1 = 2, AN = 2 + 1/AN–1, N = 2, 3, ... Найти первый из...

Цикл с условием. Найти первый из номеров К, для которых выполняется указанное условие
Дано вещественное число \varepsilon (&gt;0). Последовательность вещественных чисел AK определяется следующим образом: {A}_{1} =1, {A}_{2}=2,...

Найти первый из номеров последовательности, для которого выполняется заданное условие
Напишите плиз решение!СПАСИБО! Дано число D (&gt; 0). Последовательность чисел AN определяется следующим образом: A1 = 2, AN = 2 +...

2
Почетный модератор
 Аватар для Puporev
64319 / 47615 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
28.01.2011, 21:03
Лучший ответ Сообщение было отмечено Natasha18 как решение

Решение

Вроде так...

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var d,a,an:real;
    k:integer;
begin
clrscr;
repeat
write('Введите точность вычислений d>0 d=');
readln(d);
until d>0;
a:=2;
an:=2+1/a;
k:=2;
while abs(a-an)>d do
 begin
  a:=an;
  an:=2+1/a;
  k:=k+1;
 end;
write('K=',k,' A[k-1]=',a:0:3,'  A[k]=',an:0:3);
readln
end.
0
0 / 0 / 0
Регистрация: 28.01.2011
Сообщений: 6
28.01.2011, 21:10  [ТС]
спасибо)))))
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
28.01.2011, 21:10
Помогаю со студенческими работами здесь

Найти первый член x(n), для которого выполняется условие
Пусть x0=1 xk=2-(xk-1)3/5,k=1.2... найти первый член xn для которого xn-xn-1 &lt; 10-5 Плиз помогите.уже конец семесра а тут такое

Найти первый член последовательности, для которого выполняется условие
Дано положительное число E. Последовательность а1,а2,а3 (1, 2, 3 - индексы)образована по следующему закону: аi (i - индекс)...

Найти первый элемент последовательности, для которого выполняется условие
помогите с лабораторной работой,задание во вложении. буду очень благодарен и отблагодарю спасибками.

Найти первый член последовательности, для которого выполняется условие
Помогите решить задачу Дана последовательность An=(1-(1/2))*(1-(1/3))*(1-(1/(n+1))) и eps&gt;0 . Найти первый член последовательности An,...

Найти первый член последовательности, для которого выполняется условие
написать программу с условными операторами 11. Даны действительные числа x, ε (ε&gt;0). Последовательность a1, a2, … образована по...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД
Maks 14.04.2026
Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .
Настройки VS Code
Loafer 13.04.2026
{ "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .
Оптимизация кода на разграничение прав доступа к элементам формы
Maks 13.04.2026
Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .
Контроль заполнения и очистка дат в зависимости от значения перечислений
Maks 12.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru