pascalabcnet/TestSuite/CompilationSamples/ForeachForSet.pas

5 lines
236 B
ObjectPascal
Raw Normal View History

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