character(10)::s read*,n,m,s print*,n+m,s end