diff --git a/ejercicio3.pas b/ejercicio3.pas
index 73b0e55..8792557 100644
--- a/ejercicio3.pas
+++ b/ejercicio3.pas
@@ -86,7 +86,7 @@ begin
     write('Categoría ');
     write('Monto a cancelar');
     writeln('');
-    for i := 1 to Length(array_horas_obreros) do
+    for i := 0 to Length(array_horas_obreros) do
     begin
         write(OBREROS[i] + ' ');
         total_horas_obrero := 0;