Войти Регистрация Спроси ai-bota

Вычислить сумму ряда чисел 1+1/2+1/3++1/n,где n вводится пользователем

Показать ответ

Ответ:

gggtair2004

02.10.2020 05:06

Var
i,n:integer;
s:real;
begin
writeln('Введите n');
readln(n);
for i:=1 to n do
s:=s+(1/i);
writeln(s);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

edinorozhkaXazal

01.12.2020 07:35

2. Заполните пропуски словами: «Если ... является основным объектом в изучении предмета информатики, то компьютеры считаются главным ... в изученииданного предмета»а) информация,...

ushepbegjan

14.01.2022 02:34

4. Начертите окружность радиуса 3см. с центром О.Проведите луч с началом в точке О и отметьте на нем точку E, удаленную от точки О на 7см. Проведите окружность с центром...

joryk2012

03.03.2020 15:38

Это информатика 10011₂ + 257₈ + f2₁₆ напишите ответ...

епклсзкищут

15.11.2022 02:54

Объясните взаимосвязь материнской платы и жесткого диска....

pandapurple

15.11.2022 02:54

какие возможности существуют для сохранения документа на диске...

scravtz

15.04.2022 10:17

Сколько битов нужно чтобы закодировать выбор одного из 12 вариантов...

батуми1

15.04.2022 10:17

Сколько бит приходится на кодировку 1 символа из алфавита с мощностью 512...

nika55551

03.04.2020 04:45

Составить БСА и программу в тетради. Даны три положительных числа. Проверить, могут ли они быть длинами сторон треугольника. Если да, то вычислить площадь этого треугольника...

gaziza4

10.03.2020 14:16

Написать мини сочинение на тему зимнее утро со словосочитаниями раннее утро чистые снега пушистый иней хрупкий ледок веселые...

Sezimturatbeko

10.03.2020 14:16

Проверочные слова к счастливый счастливо несчастный...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку