use strict;
use warnings;
my $eight = int (15 / 2 ) +1;
print $eight;