Codigo agregado en progra1.c