pascalabcnet/TestSuite/CompilationSamples/ForeachForSet.pas

5 lines
236 B
ObjectPascal

// Цикл по множеству. Порядок - не по алфавиту, поскольку множества реализованы на базе хеш-таблиц
begin
foreach c: char in ['a'..'z'] do
Write(c);
end.