Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
LiraReeman
04.01.2022 07:21 •
Информатика
Pascal вывести на экран последовательность чисел и вычислить сумму ряда: 1/2, ¼, 1/6, 1/8, 1/10, …
Ответ:
асема2005
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 оценок)
Популярные вопросы: Информатика
anastasiamrz
14.03.2022 11:02
Нужно объяснить, как из этих цифр получились символы (цифры начинаются на 2 картинке)...
gorbovaekateri
07.01.2022 07:24
Напишите сообщение на тему : бит и байт возникновения...
Хурем
22.03.2022 20:06
Провести цепочку превращений. al(no³)³ al(oh)³ al²o³ al² (so⁴)³ baso⁴...
GlennRee
22.03.2022 20:06
1. расставьте точки земной поверхности по мере увеличения их абсолютной высоты. а) горы эверест б) гора эльбрус в) вулкан килиманджаро г) вулкан камерун 2. установите соотвествие...
nasibovschool
22.03.2022 20:06
Составьте небольшой рассказ на тему римляне в (на 3-4 предложения) заранее...
LVacelikova
22.03.2022 20:06
Вертолет ми 3 , двигаясь рвыномерно, пролетел 1.4 км за 20 с. его скорость равна...
smaile2
22.03.2022 20:06
Требования восставших в 1381 году в ?...
лизалол
22.03.2022 20:06
Прочитай слова з ненаголошеним и добираючи до них перевирни близенько блискучий величина зимовий вишневий високий глибокий килимок...
Yuliya475
22.03.2022 20:06
1)предложите распознавания k2so4, mgso4 и al2(so4)3. уравнения соответствующих реакций. 2) с какими из перечисленных веществ будет взаимодействовать гидроксид алюминия: fecl3, hno3,...
ROMAGTTV900
22.03.2022 20:06
Расставь знаки и скобки так, что бы получились верные равенства: 1 2 3 4 5 6 7=40 1 2 3 4 5 6 7 =55...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
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