// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadlnInteger;
var a:=ReadArrInteger(n);
var (k,m):=ReadlnInteger2;
a:=(a?[:k-1]+a[k-1:m].Reverse+a[m:]).ToArray;
a.Println
end.
Пример
6
1 2 3 4 5 6
2 5
1 5 4 3 2 6