RosettaCodeData/Task/Loops-Foreach/PascalABC.NET/loops-foreach.pas

##
foreach var s in ['Pascal','ABC','.NET'] do
  Print(s);