Ответ(ы) на вопрос:
ГостьPascalABC.NET 3.2:
begin
var a := ReadReal('Введите a:');
var n := ReadInteger('Введите n:');
print(1.To(n).Select(i -> (sin(i*i) + 2 * a * i)/(3 * i + 1)).Sum)
end.
Не нашли ответ?
Похожие вопросы