Create 11 mientras - min agricultura.vb