Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
NeMaximilan
27.09.2022 21:36 •
Информатика
Pascal вывести на экран последовательность чисел и вычислить сумму ряда: 1/2, ¼, 1/6, 1/8, 1/10, …
Показать ответ
Ответ:
579w2g3
08.10.2020 19:30
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
SeqGen(ReadInteger('n='),i->1/(2*i),1).Println.Sum.Println
end.
Пример
n= 6
0.5 0.25 0.166666666666667 0.125 0.1 0.0833333333333333
1.225
0,0
(0 оценок)
Популярные вопросы: Информатика
ДженниЛенни
25.08.2020 14:16
Виконано програму:t.forward(a)t.right(90)t.forward(a)t.right(90)t.forward(a)t.right(90)t.forward(a)t.right(90)Вибрати фігуру, яку намалює Черепашка. Коло Квадрат Трикутник...
Veroni4ka7090
23.03.2021 10:58
Пользователь вводит числа. После каждого числа нужно выводить статистику. 1. Максимальное число из введенных чисел. 2. Минимальное число. 3. Сумму. 4. Разницу...
KarinaKOSMOS
12.02.2023 07:36
Используя заданные значения простых чисел р и q, вычислить модуль n, затем сформировать открытый и закрытый ключи d и e. Используя открытый ключ, зашифровать 10 различных ключей и,...
dasha89011
19.06.2021 10:37
Запишите полный адрес файла kruto.txt, который находится в папке пользователя udav в системе Linux....
юлька438
28.07.2021 19:52
В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ «|», а для логической операции «И» – символ «&». В таблице приведены запросы...
mamaevseenko
29.04.2021 13:20
Средства манипуляции — 1) Плоттер2) монитор3) системный блок4) Клавиатура5) сканер...
arsigonin
20.03.2022 21:50
Установи соответствие между инструментами для создания векторных изображений в текстовом редакторе MS Word и их описанием. Рис. 1Рис. 2Рис. 3Рис. 4Поворот фигурыЭффекты фигурЗаливка...
kolosochok1
12.04.2022 20:59
Кесте өрістерінде Деректер типін анықта...
viktpriabihanov
30.06.2022 09:53
2. Составьте таблицу расходов за неделю текущего месяцав тенге (рис. 3.31)....
alina20021982
16.12.2020 06:32
Даны целые числа a,b и n.требуется найти количество целых x таких, что 0 =х...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
SeqGen(ReadInteger('n='),i->1/(2*i),1).Println.Sum.Println
end.
Пример
n= 6
0.5 0.25 0.166666666666667 0.125 0.1 0.0833333333333333
1.225