pascalabcnet/InstallerSamples/LINQ/First3Min.pas
Mikhalkovich Stanislav cf7e002e92 'ab'?[2:].Println
SF - ряд сокращений
Form1 - раскомментировал Здоровье кода при запуске
2020-11-16 13:16:12 +03:00

4 lines
105 B
ObjectPascal

// Первые 3 минимума
begin
ArrRandom(20).Println.Sorted.Distinct.Take(3).Println;
end.