用fortran程序统计1-1000能被15整除的数