Каролина
4 год назад
Вычисли сумму s=n∑k=1 k+1/k*k+1, если значение n вводит пользователь.Если n=10
ОТВЕТЫ
Стойко
Oct 24, 2020
Var
S:real;
k:integer;
Begin
Write('n = ');
ReadLn(k);
S:=0;
For k:= 1 to k do
S:=S+(k+1)/(k*k+1);
WriteLn('S = ',S);
End.
Пример:
n = 10
S = 3.24339971608009
S:real;
k:integer;
Begin
Write('n = ');
ReadLn(k);
S:=0;
For k:= 1 to k do
S:=S+(k+1)/(k*k+1);
WriteLn('S = ',S);
End.
Пример:
n = 10
S = 3.24339971608009
638
Смежные вопросы:
