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

Найти члены последовательности

24.04.2011, 09:00. Показов 3620. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Используя операторы цикла с предусловием(While) и постусловием(Repeat),пожалуйста помоги решить задачу:

При a > 0 задана последовательность an=(a^n)/n. Найти при eps >0 такое n, что an < eps.
eps - это очень маленькое число ( например 0.0001), которое требуется ввести с клавиатуры.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
24.04.2011, 09:00
Ответы с готовыми решениями:

Найти члены последовательности, удовлетворяющие условию
1 )Даны натуральные числа n, a1,…,an, где n≤12. Найти члены ak последовательности a1,…,an, удовлетворяющие условию 2k&lt;ak&lt;k!, и...

Найти члены последовательности, имеющие четные порядковые номера
Даны натуральные числа n, a1,…,an, где n≤5000. Найти члены ak последовательности a1,…,an, имеющие четные порядковые номера и являющиеся...

Найти те члены последовательности, которые при делении на 7 дают остаток 1, 2, 5
Даны натуральные числа n, q1, q2, q3,...qn. Найти те члены q последовательности q1, q2,... qn, которые при делении на 7 дают остаток 1, 2,...

6
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32744
Регистрация: 18.05.2008
Сообщений: 115,168
24.04.2011, 09:10
Цитата Сообщение от Грей Посмотреть сообщение
При a > 0
Наверное и при а<=1, иначе число будет быстро расти, а не убывать...
0
0 / 0 / 5
Регистрация: 21.04.2011
Сообщений: 72
24.04.2011, 15:56  [ТС]
нет, по условию при a > 0
0
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32744
Регистрация: 18.05.2008
Сообщений: 115,168
24.04.2011, 17:13
нет, по условию при a > 0
Это тоже может быть, например x=(0..1];
А если например а=2, то получим ряд
2, 2, 8/3, 4, 32/5, 64/6,..... и этот ряд будет возрастать и никогда не сойдется к маленькому числу.
0
0 / 0 / 5
Регистрация: 21.04.2011
Сообщений: 72
24.04.2011, 18:23  [ТС]
Вообще то ты прав, при таком условии последовательность будет только возрастать,
значит недочёт в условии!
Помоги сделать, учитывая то что ты сказал, про условие при a<=1)
0
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32744
Регистрация: 18.05.2008
Сообщений: 115,168
24.04.2011, 18:40
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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 a,eps,t:real;
    n:integer;
begin
clrscr;
repeat
write('Введите число 0<a<=1 a=');
readln(a);
until (a>0)and(a<=1);
repeat
write('Введите малое число eps>0 eps=');
readln(eps);
until eps>0;
if a<eps then n:=1
else
 begin
  n:=0;
  t:=1;
  while a>=eps do
   begin
    n:=n+1;
    t:=t*a;
    a:=t/n;
   end;
 end;
write('n=',n,'  an=',a:0:8);
readln
end.
1
0 / 0 / 5
Регистрация: 21.04.2011
Сообщений: 72
24.04.2011, 20:32  [ТС]
спасибо за работу)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.04.2011, 20:32
Помогаю со студенческими работами здесь

Найти члены последовательности, имеющие чётные порядковые номера и являющиеся чётными числами
Даны натуральные числа {n}_{},{a}_{1},{a}_{2}, ...,{a}_{n}.Найти члены последовательности, имеющие чётные порядковые номера и являющиеся...

Найти члены последовательности, кратные 3 и не кратные 5
N1 Даны натуральные числа n, a1,…,an, где n≤5000. Найти члены ak последовательности a1,…,an, кратные 3 и не кратные 5, и определить их...

Определить члены последовательности Фибоначчи
Дана последовательность чисел Фибоначчи. Определить члены последовательности u1, u2,...,un. (n- номер по списку). Программу и если можно...

Исключить определенные члены последовательности
Дана последовательность целых чисел а1,а2, ..., аn. Образо* вать новую последовательность, выбросив из исходной те члены, которые...

Вывести члены последовательности с нечётными номерами
«Подпрограммы (процедуры и функции), модули, рекурсия.» (использовать рекурсию) Дана последовательность натуральных чисел (одно число в...


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

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
ПЛИС
zxcha1ka_ 27.01.2026
AHDL Разработать программы для синтеза следующих устройств: 1. Параллельного регистра 4-х разрядного с синхронной загрузкой и асинхронным сбросом (обнулением); Пoмoгитe пoжaлyйстa
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru