pascalabcnet/InstallerSamples/LINQ/Consonants.pas

7 lines
179 B
ObjectPascal

// Вывод английских согласных
var vowel: string := 'aeiouy';
begin
var all := Range('a','z').Aggregate('',(s,x)->s+x);
all.Except(vowel).Println;
end.