#!/usr/bin/perl
use strict;
use warnings;

my $wasauchimmer = 0;
my $anzahl = <STDIN>;
my $zaehler = 0;
while ( $zaehler < $anzahl ) {
  $wasauchimmer += 8;
  $zaehler++;
}
print $wasauchimmer, $/;