Войти Регистрация Спроси ai-bota

Решить в паскале: s=1/(1+1)+1/(1+2)+/(1+n)

Ответ:

Snezhana206

09.07.2020 17:57

Program w;
Var i,n: integer;
S: real;
Begin
writeln('Введите число повторений');
readln(n);
for i:=1 to n do S:=S+1/(1+n);
writeln(S);
End.

0,0(0 оценок)

Популярные вопросы: Информатика

Stella2002111

21.06.2022 15:51

Вдавние времена жил купец, было у него 10 дочерей. старшей дочери исполнилось 1000 лет. вторая была на 10 лет младше старшей и на десять лет старше младшей. сколько...

Noob335

12.01.2022 04:00

На экран выводится вопрос кто ты: мальчик или девочка? если мальчик,введи 0,если девочка-1 в зависимости от ответа вывести на экран мне нравятся девочки! или мне...

DarkPear

12.01.2022 04:00

Составить программу скорость на участке дороги должна быть не выше 30 км/ч. определить нарушил ли водитель правила дорожного движения...

881881881

20.12.2021 02:41

Найти произведение элементов к-ой и р-ой строчек квадратной матрицы, размерностью 5х5 (двумерный массив)...

Jihye11

20.12.2021 02:41

Дано предложение. поменять его первое и последнее слова. pascal...

shvffvvfff

20.12.2021 02:41

Определите значение переменной a после выполнения алгоритма: a : = 6 b : = 2 b : = a/2*b a : = 2*a+3*b в ответе укажите одно целое число – значение переменной a....

skshhd

07.09.2022 23:30

Расположите поисковые запросы в порядке убывания количества найденных результатов результатов а) экскурсии & беларусь; б) экскурсии & беларусь & минск;...

saparhanaruzhan

07.01.2020 01:11

Назовите инструменты для обслуживания ПК и их характеристики...

vasilchenko17

20.03.2021 10:59

У исполнителя Альфа две команды, которым присвоены номера: 1. прибавь 2 2. умножь на b (b - неизвестное натуральное число; b ≥ 2) Выполняя первую из них, Альфа...

Kurakik

18.01.2023 08:45

Бажано також коротка аргументація відповіді....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку