advent-of-code/12021/07/07_new.awk

function abs(n){ return (n>=0) ? n : -n }

BEGIN{ RS="," }

{
 c[NR] = $1
 if(maxpos<$1) maxpos=$1
}

END{
	min = 2147483647
	for(i=1;i<=maxpos;i++){
		difs = 0
		for(j in c) difs += abs(c[j]-i)
		if(difs<min) min = difs
	}
	print min
}