integer::A(2) read *,A print '(i0)',SUM(A) end