pascalabcnet/InstallerSamples/LINQ/Consonants.pas

7 lines
176 B
ObjectPascal
Raw Permalink Normal View History

// Вывод английских согласных
2015-05-14 22:35:07 +03:00
var vowel: string := 'aeiouy';
begin
var all := Range('a','z').JoinIntoString('');
2015-05-14 22:35:07 +03:00
all.Except(vowel).Println;
end.