begin
//1 вариант
Partition(1.1, 2.1, 10).Sum.Println;
//2 вариант
Range(11, 21).Aggregate(0.0, (Sum, x)-> Sum + x / 10).Println;
//3 вариант
Range(11, 21).Select(x->x/10).Sum.Println;
//4 вариант
var Sum := 0.0;
foreach var x in Range(11, 21) do
Sum += x / 10;
Sum.Println;
end.
begin
//1 вариант
Partition(1.1, 2.1, 10).Sum.Println;
//2 вариант
Range(11, 21).Aggregate(0.0, (Sum, x)-> Sum + x / 10).Println;
//3 вариант
Range(11, 21).Select(x->x/10).Sum.Println;
//4 вариант
var Sum := 0.0;
foreach var x in Range(11, 21) do
Sum += x / 10;
Sum.Println;
end.