print "\n" unless ($_ - $num1 + 1) % 5;