2
1
0
新人
call cpu_time(start_time) do i = 1, array_size res_array1(i) = array1(i) + array2(i) res_array1(i) = array1(i) * array2(i) end do call cpu_time(end_time) write(*,*) "使用循环操作需要的时间:", (end_time - start_time)*1000, "毫秒" call cpu_time(start_time) res_array2 = array1 + array2 res_array2 = array1 * array2 call cpu_time(end_time) write(*,*) "使用数组操作需要的时间:", (end_time - start_time)*1000, "毫秒"
使用道具 举报
农村外出务工人员
712
4
大师
call cpu_time(start_time) do i = 1, array_size res_array1(i) = array1(i) * array2(i) end do call cpu_time(end_time) write(*,*) "使用循环操作需要的时间:", (end_time - start_time)*1000, "毫秒" call cpu_time(start_time) res_array2 = array1 * array2 call cpu_time(end_time) write(*,*) "使用数组操作需要的时间:", (end_time - start_time)*1000, "毫秒"
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给注册后积极发言的新人
颁发给为Fcode网站捐赠的网友
颁发给发帖量超过一定数量的坛友
颁发给论坛注册3年以上的网友
颁发给论坛热心帮助他人的网友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-4-18 02:22
Powered by Tencent X3.4
© 2013-2024 Tencent