fscanf (fl1,%d , &k0);