Ответы
Ответ дал:
0
//PascalABC.NET 3.1 сборка 1200
begin
var f := ReadInteger('k =');
var l := 8;
if f > l then swap(f, l);
Println(Range(f, l).Aggregate(0,(p, x) -> p + x));
end.
begin
var f := ReadInteger('k =');
var l := 8;
if f > l then swap(f, l);
Println(Range(f, l).Aggregate(0,(p, x) -> p + x));
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
8 лет назад
9 лет назад