PROGRAM NO1499 INTEGER :: I,T INTEGER,ALLOCATABLE,DIMENSION(:):: TI READ(*,*) T ALLOCATE(TI(T)) DO I = 1 , T READ(*,*) TI(I) END DO DO I = 1,T WRITE(*,*) 'hitsuji ga',TI(I)+1,'hiki' END DO END PROGRAM