число 50
0+ 50; 1+49; 2+48; 3+47; 4+46; 5+45;... 49+1:
===== PascalABC.NET =====
begin
Range(0, ReadInteger).Sum.Println
end.
число 50
0+ 50; 1+49; 2+48; 3+47; 4+46; 5+45;... 49+1:
===== PascalABC.NET =====
begin
Range(0, ReadInteger).Sum.Println
end.