ancho = input("Dame el ancho de la imagen")
alto = input("Dame el alto de la imagen")

archivo = fopen("binaria.ppm","w")

fprintf(archivo,"P1\n%d %d\n",ancho, alto);

pixelesXrenglon=[1:ancho];

renglonblanco=pixelesXrenglon(1:(ancho/2))*0
renglonnegro=pixelesXrenglon((ancho/2):ancho)*0+1

fprintf(archivo,"%d %d ",renglonblanco,renglonnegro)
fclose(archivo)

