Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
79272197114
21.10.2022 17:07 •
Информатика
По данному натуральному значению n вычислите 1+1/3+1/5+1/7++1/2n+1 на вход программе подаётся натуральное число n< 100000
Ответ:
IamInga18
05.10.2020 16:02
// PascalABC.NET 3.2, сборка 1387 от 20.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('S=',1+Range(1,ReadInteger('n=')).Select(i->1/(2*i+1)).Sum)
end.
Пример:
n= 10
S=2.1808745777786
0,0
(0 оценок)
Популярные вопросы: Информатика
Rinochek19
28.11.2020 20:25
Каждый ученик в классе изучает по крайней мере один из двух языков: , французский. анг-й изучают 25 ч. фран-й 27 ч. оба языка изучают 18 ч. сколько уч. изучают только...
Виолетта2209
10.04.2023 05:13
Получите внутреннее представление числа -157 в 8-разрядной это по правилам двоичной я число инвертировала получилось 01100010 сейчас осталось только прибавить единицу,...
egorushka55
14.12.2022 01:10
Составьте программу,каторая по задоннаму a исследует корни уравнения aх=5 и выводит на экран значение высленного корня либо сообщение корней нет...
nsotskova
17.04.2023 22:25
Дан фрагмент электронной таблицы а | в | c 1 4 | 2 | 2 1 | 3 | =а2+2*b$2 чему станет равным значение ячейки c1,если в неё скопировать формулу из ячейки с2? в ответе...
bog2017
08.03.2022 05:31
Как перевести из десятичной в восьмеричную систему 600...
sanyok505
15.02.2020 17:21
Василий перевёл некоторое число в двоичную систему счисления, результат содержит 5 цифр. какое это могло быть число? назовите наименьшее и наибольшее возможные значения....
НикаиВикаСестры
02.05.2023 05:31
Решить без синусов,.8 класс...
Kjabarovsk
26.11.2022 13:58
На рисунке найдите количество треугольников с площадью 1.(Каждая клетка — это квадратсо стороной 1. *86795...
Bashirov12
21.01.2023 13:31
Скільки гасу потрібно спалити щоб виділилася 2л води, узятої за температури 20°С...
nysha046
28.07.2022 22:54
Географічні координати північної точки острова Ісландія ів...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
Writeln('S=',1+Range(1,ReadInteger('n=')).Select(i->1/(2*i+1)).Sum)
end.
Пример:
n= 10
S=2.1808745777786