Var a, a1:real ;
Begin
Write('a=') ;read(a) ;
A1:=exp(ln(A) *8);
Writeln;
Write('A^8=',Round(a1) );
End.
