integer(KIND=16)::n read*,n print'(i0)',n*10 end