integer:: fp fp = 800000*24240 print*, fp end
program main implicit none integer(8):: fp fp = 800000_8*24240_8 print*, fp end program