Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 16.03.2017
Сообщений: 57

Итерационный цикл

16.03.2017, 22:49. Показов 1057. Ответов 1
Метки c (Все метки)

Студворк — интернет-сервис помощи студентам
Нужно вычислить S=x+(x2/2)+(x3/3)+(x4/4)+...+(xn/n), пока очередной член - n меньше e. Вывести значение последнего члена - a и значение N.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
var x,n:integer;
a,s,e:real;
 
begin
write('Введите x=');readln(x);
write('Введите e=');readln(e);
s:=x;
while n<e do begin
  a:=((Exp(n*ln(x)))/n); //Для выведения значения последего члена
  s:=s+a;
  n:=n+1;
  end;
n:=n-1;
write('S=',s,', Значение последнего члена =',a,', Значение n=',n);
end.
Либо в условие задачи ошибка, либо в программе, так как S всегда бесконечная.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
16.03.2017, 22:49
Ответы с готовыми решениями:

Итерационный цикл: вычислить сумму ряда
Добрый вечер всем. Прошу помощи в решении данной задачи: Хочу проанализировать все действия и сделать выводы, к которым сам не смог...

Разработать алгоритм с применением вложенных базовых структур «цикл с предусловием» или «цикл с постусловием»
Разработать алгоритм с применением вложенных базовых структур «цикл с предусловием» или «цикл с постусловием», составить и отладить...

Итерационный цикл и цикл с известным числом повторения
5.12-интерационный цикл 4.9-цикл с известным числом повторений

1
 Аватар для Hitoku
1755 / 1347 / 1407
Регистрация: 28.10.2016
Сообщений: 4,267
16.03.2017, 23:52
Pascal
1
2
3
4
5
6
7
8
9
begin
  var x:=ReadlnInteger('X = ');
  var e:=ReadlnInteger('E = ');
  var s:=x*1.0; var n:=2;
  while n<e do begin
    s+=power(x,n)/n; n+=1;
  end;
  write('S = ',s:0:3,', Значение последнего члена = ',power(x,n-1)/(n-1):0:3,', Значение n = ',n-1);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
16.03.2017, 23:52
Помогаю со студенческими работами здесь

итерационный цикл
помогите составить проги с такими условиями:

Пример на точность, итерационный цикл
http://img84.imageshack.us/img84/5822/attachmentdj.jpg Условие задачи один знакомый программист со стажем сделал так, препод сказал,...

Итерационный цикл с рекуррентным соотношением
Помогите плиз с текстом программы...

Итерационный цикл, сумма ряда.
Нужна программа для Паскаля

Итерационный цикл (функция задана с использованием ряда Тейлора)
Здравствуйте! Возникли затруднения с решением одной задачи. Есть некоторые соображения, но они не доходят до создания самой программы....


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru