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


Alina2007203
14.04.2020 19:13

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

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
umnik250
umnik250
15.05.2023 07:46
Почему при работе за компьютером необходимо соблюдать правила техники безопаснисти?...
autosteklo777
autosteklo777
26.09.2021 07:52
По восприятия человек различает следующие виды информации...
nikin25
nikin25
24.03.2023 23:47
Как назвать эту группу слов одним 1. солнце , воздух , ветер , почва. 2. автомобиль , корабль , самолёт , поезд. 3. стол , стул , диван , шкаф . 4. автомобиль , самолёт...
McGohanskii
McGohanskii
29.08.2022 09:37
Що таке роздільність зображення?​...
Lelka8891
Lelka8891
18.05.2021 22:17
Що таке Растрове зображення? ​...
novakk020
novakk020
14.04.2022 22:26
Определите правильное количество операционных систем для компьютера...
исма19
исма19
14.07.2020 00:47
Чему равно число 1100 с основанием 8 в десятичной системе счисления?...
Камила070
Камила070
31.08.2020 11:00
Program fact; var i: Integer;x, z, a, b, c:real;begin z:=0; i:=0; repeat writeln ( Введите результаты спортсменов a, b, c ); readln (a, b, c); x:=(a+b+c)/3; writeln(x);...
Ilyauhdhbtxskr
Ilyauhdhbtxskr
20.07.2020 16:21
Коля! ты пойдёшь в школу? - спросил я друга. нет, - ответил коля. сколько информации я получил? а - 1 бит, б - 2 байта, в - 8 бит, г - 1 бит...
Оливия20
Оливия20
20.08.2021 11:02
Определите, каким десятичным числам соответствуют следующие двоичные коды 8-разрядного представления целых чисел. 00100111 и 11110101...
Ответ:
irishkaevdokimova14
10.08.2020 14:53
Program n1;
var n,i: integer;
sum: real;
begin
sum:=0;
readln(n);
for i:=1 to n do sum:=sum+1/i;
write(sum);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота