Для заданного числа n составьте программу вычисления суммы s=1+1/2+1/3+1/4+…+1/n, где n – натуральное число через repeat,
hippol
3
24.05.2019 09:01
4
Другие вопросы по теме Информатика
MikassaSwag
24.11.2021 05:36
sohibjon457
21.06.2019 03:30
lena1700
02.02.2021 23:16
KitoKota
02.02.2021 23:20
viktoria190290
02.02.2021 23:25
Курьяма1
02.02.2021 23:25
versuspro99
07.06.2019 16:40
leo00000
17.04.2019 06:50
Anif
17.04.2019 06:50
Популярные вопросы
- Установи соответствие между элементами религиозной культуры и ее разделами....
2 - Нужно составить план по тексту...
2 - Одна из сторон треугольника равна 12 см,вторая-в 3 раза длиннее первой,а...
2 - Бір бригада 41 3/4т картоп, ал екіншісі одан 2 1/2т картоп кем жинады.екі...
2 - Решить вычислительную техники , вариант 1...
2 - Держи голову уклонно, а сердце покорно. о чем пословица?...
3 - Варианты ответов: y=2x−3 y=−3x+2 y=1,5x−3 y=−2: 3x+3объясните как...
2 - Обчислити наближено за доромогою диференціала. y=^3√x...
2 - Работа с планом на рисунке изображён план квартиры масштаб 1 : 250...
1 - 100 .сделайте из прямой речи косвенную.начало предложения: john said...
1
program raf105;
var
i,n: integer;
s: real;
begin
write('Введите N: ');
readln(n);
repeat
i:= i+1;
s:= s + 1/i;
until i = n;
writeln('S = ',s);
end.
PascalABC 3.4.2