Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Anastasia191327
17.08.2022 07:05 •
Информатика
Дано натуральное n вычислить: 2/1+3/2+4/+(n+1)/n
Ответ:
Predator32
06.07.2020 01:20
Var n,i:integer;
x:real;
begin
readln(n);
for i:=1 to n do
x+=(i+1)/i;
writeln(x);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Celebrat
27.09.2022 04:34
1какие четыре типа обработки информации можно выделить? примеры 2 какова схема процесса передачи информации?...
asya343434
25.10.2022 06:27
Решается оценка 1-6 и вариант 2 1. запишите в натуральное число в 8-битную ячейку памяти. число 70 2. запишите в отрицательное целое число в 8-битную ячейку памяти....
gulnarakazimov
12.04.2021 03:15
написать программу , уже очень долго сижу с ней но результат не получается. За правильную программу все честно. Реально нужна ! Дан целочисленный массив из 200 элементов....
Werevolk1
30.10.2022 15:55
Nпервых простых чисел представляются в двоичной системе счисления и записываются подряд. из полученной последовательности нулей и единиц формируется числовая последовательность,...
zadrotovg
30.12.2020 12:39
с примеромОбъясните мне действия...
тата238
31.12.2020 10:30
написать о замке мечты на английском...
GGG1771
06.03.2021 15:50
тут сочинение надо написать...
meizum2luba
19.01.2023 16:00
Сотнесите органы выделения и группы живых организмов...
NuraiZhu
28.05.2022 16:26
Решить пример числитель X + 0 7,10 знаменатель десятичная дробь 2,6 равно 4 1/2 обыкновенная дробь...
tashbaeva201
29.06.2021 01:34
2 ] Разложите на множители: bx” – 25b...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
x:real;
begin
readln(n);
for i:=1 to n do
x+=(i+1)/i;
writeln(x);
end.