pascalabcnet/TestSuite/CompilationSamples/ForeachForSet.pas
Бондарев Иван e6e67c193c initial commit
2015-05-14 21:35:07 +02:00

5 lines
158 B
ObjectPascal

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