program main implicit none integer a, b, c, d, s read *, a, b, c, d, s if (a * c + b * d .le. s) then write (6,fmt="(A)") "Yes" else write (6,fmt="(A)") "No" end if end program main