Найти сумму всех вводных чмсел от F до 8 помоги плиз)

//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.