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

Найти первый член последовательности, для которого выполняется заданное условие

26.09.2014, 17:08. Показов 1638. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
1) Дано действительное число x. Последовательность a1,a2,... образована по след. закону:https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}={x}^{n}/(2n)!
Получить https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{1}+...https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{k}, где k-наим целое число, удовлетворяющее двум условиям: k>10 и https://www.cyberforum.ru/cgi-bin/latex.cgi?|{a}_{k+1}|<{10}^{-5}

2) Даны действительные числа x,e(e>0). Последовательность https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{1},https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{2}...образована по следующему закону:https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{1}=x; далее для n=2,3, ...выполнено:
https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}=3+1/{2}^{n} {\cos}^{2}({a}_{n-1}-x)
Найти первый член https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}(n>=2), для которого выполнено условие |https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}-https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n-1}|<e(ограничиться рассмотрением первых https://www.cyberforum.ru/cgi-bin/latex.cgi?{10}^{4}членов)
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
26.09.2014, 17:08
Ответы с готовыми решениями:

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

Найти наименьший номер члена последовательности, для которого выполняется условие |ai-ai-1|<E
Найти наименьший номер члена последовательности, для которого выполняется условие |ai-ai-1|&lt;E. Вывести на экран номер этого элемента и...

Найти наименьший номер элемента последовательности, для которого выполняется условие М
Найти наименьший номер элемента последовательности, для которого выполняется условие М. Вывести на экран этот номер и все элементы аi,...

3
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
26.09.2014, 17:22
Лучший ответ Сообщение было отмечено Morhon как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var k:integer;
    x,a,a2,s:real;
begin
write('x=');
readln(x);
a:=1;
k:=0;
s:=0;
repeat
k:=k+1;
a:=a*x/(2*k*(2*k-1));
s:=s+a;
a2:=a*x/(2*(k+1)*(2*(k+1)-1));
until(k>10)and(abs(a2)<0.00001);
write('s=',s:0:6,' k=',k,' a',k+1,'=',a2:0:8);
end.
Добавлено через 6 минут
Второе задание неаккуратно написано, непонятно все ли что справа от знака / знаменатель?

Добавлено через 1 минуту
Если так, то это выражение должно быть в скобках, иначе делим только на 2n а на остальное умножвем
1
0 / 0 / 0
Регистрация: 25.12.2013
Сообщений: 11
26.09.2014, 17:29  [ТС]
3) (Последнее) Дано действительное число e(e>0). Последовательность https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{1}, https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{2}... образована по след закону:
https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}=\sqrt{1/2}\sqrt{1/2+1/2\sqrt{1*2}} ... \sqrt{1/2+1/2\sqrt{1/2+...1/2\sqrt{1/2}}}
Найти первый член https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n} (n>=2), для которого выполнено след условие |https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n}-https://www.cyberforum.ru/cgi-bin/latex.cgi?{a}_{n-1}|<e

Добавлено через 2 минуты
Забыл поставить скобки там 1/2 в степени n только
0
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
26.09.2014, 17:46
У нас правилами предписано для каждого вопроса создавать новую тему.
И оформляй задание так, чтобы не возникало вопросов. Так что давай, создавай 2 новые темы, а здесь я удалю лишнее.

Добавлено через 15 минут
Вторая вроде так, как понял.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
uses crt;
var n:integer;
    x,e,a1,a2,t:real;
begin
write('x=');
readln(x);
repeat
write('e>0 e=');
readln(e);
until e>0;
a1:=x;
a2:=3+0.25*sqr(cos(a1-x));
n:=2;
t:=0.25;
repeat
n:=n+1;
if n>1000 then
 begin
  write('Ряд не сошелся за 1000 итераций');
  readln;
  exit
 end;
a1:=a2;
t:=t/2;
a2:=3+t*sqr(cos(a1-x));
until abs(a1-a2)<e;
write('an=',a2:0:8,' |an-a[n-1]|=',abs(a1-a2):0:8);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
26.09.2014, 17:46
Помогаю со студенческими работами здесь

Найти наименьший номер члена последовательности, для которого выполняется условие
Друзья, помогите написать программу с использованием циклов.найти наименьший номер члена последовательности , для которого выполняется...

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

Найти наименьший номер члена последовательности, для которого выполняется условие
Здравствуйте. Прошу помочь с заданием. Найти наименьший номер члена последовательности, для которого выполняется условие |An -...

Найти наименьший номер члена последовательности, для которого выполняется условие
Найти наименьший номер члена последовательности, для которого выполняется условие ( на листочке ) Вывести на экран этот номер и все...

Найти первый номер последовательности, для которого выполняется заданное условие
Дано действительное число ε (&gt; 0). Последовательность действительных чисел АK определяется следующим образом: А1 = 1, А2 = 2, АK =...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru