PascalABC.NET
begin
var a := ArrRandom(15, 0, 50);
a.Println;
var (k, l) := ReadInteger2;
a?[k - 1:L].DefaultIfEmpty.Min.Println
end.
PascalABC.NET
begin
var a := ArrRandom(15, 0, 50);
a.Println;
var (k, l) := ReadInteger2;
a?[k - 1:L].DefaultIfEmpty.Min.Println
end.