
Gavinrandis
5 год назад
Составить блок-схему вычисления суммы ряда:

ОТВЕТЫ

Kalevi Ahti
Oct 24, 2020
Программа на языке Pascal:
Var
S:real;
n:integer;
Begin
Write('k = ');ReadLn(n);
For n:= 1 to n do
S:=S+(n+1)/(n*n);
WriteLn('S = ',S);
End.
k = 4
S = 3.50694444444444
Var
S:real;
n:integer;
Begin
Write('k = ');ReadLn(n);
For n:= 1 to n do
S:=S+(n+1)/(n*n);
WriteLn('S = ',S);
End.
k = 4
S = 3.50694444444444
- уу ладно
54
Смежные вопросы: