С Новым годом! Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 14.03.2013
Сообщений: 3
1

Найти сумму и произведение членов ряда

28.03.2013, 09:56. Показов 957. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
помогите решить задачу.
Дано: натуральное n, действительные a 1, a 2,...,a n. Вычислить: a1 + a2 * (a2 –1) + a3 * (a3 –1) * (a3 – 2) + a4 * (a4 – 1) * (a4 – 2) * (a4 – 3) + ... + an * (an – 1) * (an – 2) *...* (an – n +1).
нельзя использовать массивы только простые циклы.
выручайте а то я совсем не могу разобраться
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
28.03.2013, 09:56
Ответы с готовыми решениями:

Найти произведение членов ряда
Дано целое число N (>0). Вывести произведение 1*2*...*N. Чтобы избежать целочисленного...

Найти произведение членов ряда
найти произведение 1/2*1/4*1/8*...*1/2^a

Подсчитать сумму членов ряда и сумме первых 10 членов ряда
Для ряда, члены которого вычисляются по формуле(ниже формула). Подсчитать сумму членов ряда с...

Найти сумму членов ряда
Найти сумму 3 членов ряда...

3
Почетный модератор
64303 / 47600 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
28.03.2013, 15:23 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

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 n,i,j:integer;
    a,s,p:real;
begin
clrscr;
write('Количество чисел n=');
readln(n);
writeln('Введите ',n,' действительных чисел:');
s:=0;
for i:=1 to n do
 begin
  readln(a);
  p:=1;
  for j:=1 to i do
  p:=p*(a-j+1);
  writeln(p:0:2);
  s:=s+p;
 end;
write('s=',s:0:2);
readln
end.
1
0 / 0 / 0
Регистрация: 14.03.2013
Сообщений: 3
28.03.2013, 15:26  [ТС] 3
Спасибо Огромнейшее!
0
Почетный модератор
64303 / 47600 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
28.03.2013, 15:31 4
Строку
Pascal
1
writeln(p:0:2);
можно убрать, это для проверки
1
28.03.2013, 15:31
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
28.03.2013, 15:31
Помогаю со студенческими работами здесь

Найти сумму членов ряда
Найти сумму членов ряда x-(x^3)/3+...+(-1)^n * ((x^(2n+1)/(2n+1))+..., ( где i = 1, 2, ..,),...

Найти сумму 10 членов ряда
Найти сумму 10 членов ряда S=2/3+4/9+8/81+...

Найти сумму членов ряда
1. Составить программу, выполняющую расчет следующей суммы 1^2+2^2+3^2+…+n^2. Значение n...

Найти сумму членов ряда
Вычислить значение выражения 1*2 + 2*3*4 +... +n*... *2n Прошу подсказки, не могу сообразить с...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Что такое HCL Notes и как с ним работать
InfoMaster 10.01.2025
HCL Notes (ранее известный как IBM Notes и Lotus Notes) представляет собой комплексную платформу для совместной работы и обмена информацией в корпоративной среде. Это многофункциональное решение,. . .
Как работать с Git из Windows и Visual Studio
InfoMaster 10.01.2025
Работа с Git в Windows Работа с Git в операционной системе Windows может быть осуществлена с помощью различных инструментов, каждый из которых обладает своими уникальными возможностями и. . .
Аналог оператора switch case в Python
InfoMaster 10.01.2025
Оператор switch case используется в программировании для выбора одного из нескольких вариантов исполнения кода. Однако в языке Python этот оператор отсутствует. Понимание аналогов switch case в. . .
Отличия абстрактного класса от интерфейса
InfoMaster 10.01.2025
В современной разработке программного обеспечения существуют два основных механизма реализации абстракции: абстрактные классы и интерфейсы. Эти инструменты, хотя и схожи в своей основной цели -. . .
Как работать в Git
InfoMaster 10.01.2025
Git — это одна из наиболее популярных систем контроля версий, которая активно используется разработчиками по всему миру. Она позволяет эффективно управлять изменениями в коде, координировать работу. . .
Реализация передвижения персонажа в Unity3d на C#
InfoMaster 10.01.2025
Реализация передвижения персонажа в Unity3D начинается с правильной настройки проекта. Этот этап критически важен для создания отзывчивого и плавного управления. Рассмотрим основные шаги для создания. . .
Docker: руководство для начинающих
InfoMaster 10.01.2025
В современном мире разработки программного обеспечения контейнеризация стала неотъемлемой частью процесса создания и развертывания приложений. Docker, как ведущая платформа контейнеризации, произвела. . .
Книги и учебные ресурсы по C#
InfoMaster 08.01.2025
Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .
Что такое NullReferenceEx­­­ception и как исправить?
InfoMaster 08.01.2025
NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .
Что такое Null Pointer Exception (NPE) и как это исправить?
InfoMaster 08.01.2025
Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .
Русский язык в консоли C++
InfoMaster 08.01.2025
При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .
Telegram бот на C#
InfoMaster 08.01.2025
Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru