Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vikamolchanova1
27.05.2022 01:18 •
Информатика
Pascal вывести на экран последовательность чисел и вычислить сумму ряда: 1/2, ¼, 1/6, 1/8, 1/10, …
Показать ответ
Ответ:
kovmihser228
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 оценок)
Популярные вопросы: Информатика
grimangus
26.04.2023 12:34
Выберите программы которые относятся к инструментальному по Windows, Internet Explorer, среда программирования Visual Basic, блокнот, калькулятор, программы дефрагментации диска,...
Оленка124683
04.09.2021 15:49
Задание выполняем в программе MS EXCEL Небольшой кинотеатр «Заря», имеющий только один зрительный зал, осуществляет бронирование билетов на фильмов. В расписании сеансов кинотеатра...
Lizzzzxff
14.04.2022 19:49
Если при вводе в ячейку константа оказалась в левой части ячейки - к какому типу констант она относится?...
Serlous
18.02.2022 20:07
I-нұсқа 1.PowerPoint бағдарламасы не үшін қажет? A)Формулалық өрнектерді есептеу тиімділігін арттыру B)Ақпаратты есте сақтау және қабылдау тиімділігін арттыруға арналған көрмелерді...
Voprosik4695
02.10.2020 11:23
Книга содержит 138 страниц. На каждой странице 35 строк. В каждой строке 58 символов(включая пробелы). Найти информационный объём текста, считая, что каждый символ кодируется одним...
AlicaMinenkova
30.01.2020 02:17
1)сколько бит информации несет сообщение о том что из колоды в 32 карты достали пику 2)проводятся две лотереи: 4 из 32 и 5 из 64 . сообщение о результатах какой из лотерей несет больше...
gaukhars01
30.01.2020 02:17
Дайте все ответы на игру конкурс инфознайка по информатике...
natazhukova95
11.09.2022 14:19
Менің дағыстаным басты кейіпкері кім?ол немен айналысқан?...
yuliayatseniuk1
01.07.2021 06:45
НУЖНОО Прочитайте текст и вставьте пропущенные слова.К середине XV века великий московский князь был самым могущественным правителем на Руси. Большинство земель были присоединены...
musinalarisa
01.07.2021 06:45
Наибольшая высота Солнца над горизонтом в полдень: Летом и зимой Весной Осенью Зимой Летом...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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