Ответы
Ответ дал:
0
// PascalABC.NET 3.2, сборка 1381 от 04.02.2017
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(Range(1,10).Aggregate(0.0,(x,y)->x+cos(y)))
end.
Результат
-1.41744774645591
// Внимание! Если программа не работает, обновите версию!
begin
Writeln(Range(1,10).Aggregate(0.0,(x,y)->x+cos(y)))
end.
Результат
-1.41744774645591
Вас заинтересует
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
10 лет назад