1. даны числа от 1 до n.найти s: 1/2+1/3+…+1/n
Vladochka14
2
21.05.2019 20:20
2
Другие вопросы по теме Информатика
IKristin
27.11.2020 15:41
Zaya191
29.10.2020 21:17
Айхан111111
29.10.2020 21:17
vadimash
09.08.2019 14:20
РаскольниковРодион
25.09.2019 03:50
namazovaainur
25.09.2019 03:50
ruslankalita746rusan
25.09.2019 03:50
Популярные вопросы
- Найдите притяжательные местоимения! ...
2 - .Відрізок АВ не перетинає площину α , А_1 В_1 – проекція відрізка АВ...
3 - Впишите правильный ответ. Четырёхугольник АВСD вписан в окружность....
2 - Расчитайте относительные малекулярные массы соеденинений :b) ZnCI2....
2 - решить но если хотите бедному человеку, то подскажи те что-то ещё ...
2 - З якою метою на північно-східних кордонах імперії базувалися табори...
3 - КАК РЕШАТЬ Для перевезення школярів до спортивного табору потрібно...
1 - О продаже какой территории Соединенным Штатам Америки идет речь в отрывке...
1 - Опишите картину на Английском языке(7 класс)2 картинка))...
1 - Подчеркни главные члены предложения: подлежащее и сказуемое.ответы...
1
var
i,n:integer;
s:real;
begin
repeat
write ('N = ');readln(n);
until (n>0);
s:=0;
for i:=1 to n do s:=s+1/i;
writeln ('S = ',s:0:4);
readln;
end.