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

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