my $n = <>;
my $m = <>;
$n %= 10;
$m %= 4;

my $mul = $n;

for(my $i = 1; $i < $m; $i++) {
  $n *= $mul;;
  $n %= 10;
}
print$n,$/;