Ответы
Ответ дал:
0
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=6;
var S:=Range(3,12).Select(n->1/(a+n*n)).Sum;
Writeln('S=',S)
end.
Результат
S=0.23612523046681
// Внимание! Если программа не работает, обновите версию!
begin
var a:=6;
var S:=Range(3,12).Select(n->1/(a+n*n)).Sum;
Writeln('S=',S)
end.
Результат
S=0.23612523046681
Вас заинтересует
2 года назад
2 года назад
2 года назад
9 лет назад
9 лет назад