¡Feliz Día!

program saludo;
var i:integer;
begin
        for i:= 1 to 1000 do
        writeln ("¡feliz dia a tod@s!");
end.


Feliz día a todos los programadores/as y también a los bibliotecarios/as.