! yukicoder My Practice ! author: Leonardone @ NEETSDKASU PROGRAM yukicoder INTEGER(8) :: d, p, ans READ(*,*) d, p ans = (d * (100 + p)) / 100 PRINT '(I0)', ans STOP END PROGRAM yukicoder