Для заданного натурального n и действительного x подсчитать сумму
S=1+1/2+1/3+...+1/n
(программа в паскале)
xyxankablebaa:
поищи в знаниях, этот вопрос уже задавали
Ответы
Ответ дал:
0
Ответ:
var n,i:integer;
s:real;
begin
write('Введите число N - '); readln(n);
for i:=1 to n do
s:=s+(1/i);
write(s:0:4);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад