integer(KIND=16)::N read *,N print *,N*10 end