Знайти суму всіх парних чисел від 1 до n. паскаль

lolkajoin lolkajoin    1   23.07.2019 04:50    0

Ответы
Елена29121983 Елена29121983  03.10.2020 11:21
//PascalABC.NET 3.1 сборка 1200
begin
  writeln(range(1, ReadInteger('n =')).Where(x -> x mod 2 = 0).Aggregate((s, x)-> x + s));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика