найти сумму - Pascal ABC - Киберфорум

Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.80/5:

@александр_танк 0 / 0 / 0 Регистрация: 16.05.2013 Сообщений: 44

	найти сумму 31.05.2013, 11:18. Показов 1016. Ответов 1 Метки нет (Все метки) найти сумму 2/3+3/4+...+n/(n+1) 0

Лучшие ответы (1)

Сообщение: #4647291

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

31.05.2013, 11:18

Ответы с готовыми решениями:

Из 5 введенных чисел найти сумму положительных, сумму отрицательных, а также их количество
С клавиатуры вводится 5 чисел. Написать программу, которая найдет сумму положительных чисел, сумму отрицательных чисел, и количество...

Вычислить сумму и найти число слагаемых, которые вошли в сумму
Помогите пожалуйста в решении задачи. Вычислить сумму и найти число слагаемых, которые вошли в сумму (см. таблицу 4). Процесс вычислений...

Найти сумму элементов чётных строк массива. Вывести сам массив и сумму
Найти сумму элементов чётных строк массива. Вывести сам массив и сумму. FRepresentation, будьте внимательны с выбором раздела!

Striker

SausageFlat

242 / 221 / 154

Регистрация: 19.08.2012

Сообщений: 499

Записей в блоге: 1

31.05.2013, 11:32

Сообщение было отмечено александр_танк как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
var
  sum: real;
  n, i: integer;
 
begin
  Readln(n);
  for i := 2 to n do
    sum := sum + (i / (i + 1));
  
  Writeln(sum);
end.

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

31.05.2013, 11:32

Помогаю со студенческими работами здесь

Найти сумму наиболее длинной цепочки положительных чисел и выдать сумму и длину
Создать массив из 20-ти случайных чисел из диапазона от -10 до +10 и найти сумму наиболее длинной цепочку положительных чисел и выдать...

Даны матрицы A(nxm), B(kxl). Найти сумму элементов, имеющих нечетную сумму индексов
Ребят помогите кто чем может. Даны матрицы A(nxm), B(kxl). Найти сумму элементов, имеющих нечетную сумму индексов.

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

Массив: Найти их сумму и сумму чисел, разделенных на 2, сравнить эти суммы между собой.
Нужно написать программу используя одномерные массивы. Буду благодарен. Есть действительные числа X1, ..., X15. Найти их сумму и сумму...

Найти сумму периметров и сумму площадей равнобедренных трапеций
2) Даны основания и высоты десяти равнобедренных трапеций. Найти сумму их периметров и сумму их площадей.

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Как я обхитрил таблицу Word Alexander-7 21.03.2026 Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .	Krabik - рыболовный бот для WoW 3.3.5a AmbA 21.03.2026 без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .	Программный отбор значений справочника Maks 21.03.2026 Установка программного отбора значений справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит предопределенное значение перечислений. Процедура. . .	Переходник USB-CAN-GPIO Eddy_Em 20.03.2026 Достаточно давно на работе возникла необходимость в переходнике CAN-USB с гальваноразвязкой, оный и был разработан. Однако, все меня терзала совесть, что аж 48-ногий МК используется так тупо: просто. . .
Оттенки серого Argus19 18.03.2026 Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .	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 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .

Наверх