Составить программу в паскале для вычисления суммы степеней (1/1)^n+(1/2)^n+...+(1/n)^n через вложенный цикл.Очень срочно.
Ответы
Ответ дал:
0
var k,sum:real;n,i,j:integer;beginReadln(n);for i:=1 to n do begink:= 1/i;for j:=1 to n do begink:= k * k;end;sum:= sum + k;end;writeln('sum =', sum);end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
7 лет назад
7 лет назад
8 лет назад