[Ñuño Martínez]

Código Delphi [-]
PROCEDURE Felicitaciones (Foreros: TStringList);
VAR
  Cnt: INTEGER;
BEGIN
  FOR Cnt := 0 TO Foreros.Count - 1 DO
    WriteLn (Foreros[Cnt] + ' te dice: ¡Felicidades, Kipow!');
END;

Creo que así terminamos antes, ¿no?