题目
fortran时间函数获得的数据的单位是什么?例如cpu_time,date_and_time,system_clock 得到的数的单位是什么
提问时间:2021-04-01
答案
cpu_time返回的是一个浮点型,表示当前CPU运行时间(以秒计)
示例:
program test_cpu_time
real ::start,finish
call cpu_time(start)
!put code to test here
call cpu_time(finish)
print '("Time = ",f6.3," seconds.")',finish-start
end program test_cpu_time
date_and_time稍微复杂,但包括很多信息,包括日期,时间,时区,最后一个参数是一个大小为8的整型数组,记录了年,月,日,时区差(以分钟计),小时,分钟,秒,毫秒.
program test_time_and_date
character(8) ::date
character(10) ::time
character(5) ::zone
integer,dimension(8) ::values
!using keyword arguments
call date_and_time(date,time,zone,values)
call date_and_time(DATE=date,ZONE=zone)
call date_and_time(TIME=time)
call date_and_time(VALUES=values)
print '(a,2x,a,2x,a)',date,time,zone
print '(8i5))',values
end program test_time_and_date
system_clock用于决定处理器时钟周期.count_rate用于决定每秒CPU的时钟计数,
PROGRAM test_system_clock
INTEGER ::count,count_rate,count_max
CALL SYSTEM_CLOCK(count,count_rate,count_max)
WRITE(*,*) count,count_rate,count_max
END PROGRAM
示例:
program test_cpu_time
real ::start,finish
call cpu_time(start)
!put code to test here
call cpu_time(finish)
print '("Time = ",f6.3," seconds.")',finish-start
end program test_cpu_time
date_and_time稍微复杂,但包括很多信息,包括日期,时间,时区,最后一个参数是一个大小为8的整型数组,记录了年,月,日,时区差(以分钟计),小时,分钟,秒,毫秒.
program test_time_and_date
character(8) ::date
character(10) ::time
character(5) ::zone
integer,dimension(8) ::values
!using keyword arguments
call date_and_time(date,time,zone,values)
call date_and_time(DATE=date,ZONE=zone)
call date_and_time(TIME=time)
call date_and_time(VALUES=values)
print '(a,2x,a,2x,a)',date,time,zone
print '(8i5))',values
end program test_time_and_date
system_clock用于决定处理器时钟周期.count_rate用于决定每秒CPU的时钟计数,
PROGRAM test_system_clock
INTEGER ::count,count_rate,count_max
CALL SYSTEM_CLOCK(count,count_rate,count_max)
WRITE(*,*) count,count_rate,count_max
END PROGRAM
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1描写树叶的优美语句
- 2He went to the movies yesterday 改成否定句和疑问
- 3we are going to have ( )of fun at the party、
- 4已知一种化合物的质谱,核磁(氢谱,碳谱),如何判断化合物结构
- 5左边一个九右边一个王念什么?
- 6已知在等腰三角形abc中,ab=ac,周长为16cm,若ac边上的中线bd把三角形abc分成周长差为4cm的两个三角形,
- 7《济南的冬天》体会下列句子中括号内的词语为什么不能去掉
- 8妈妈用15.7m长的竹篱笆墙围一个半圆形鸡舍 这个鸡舍靠墙的一边长多少米?
- 9my sister went to bed after my mother come back last night的同义句
- 10化简.(a-b)(b-a)4(b-a)p+q+1.
热门考点
- 1用火把连接A,B球的细线烧断木质框架质量为M,轻质弹簧劲度系数为k,弹簧与小球A相连,A、B球用细线%
- 2一字之师中郑谷是怎样的人,齐己又是个怎样的人呢?
- 3凡尔赛宫说明的对象是什么 说明对象的主要特征是什么 文中哪一句话概括了这一特征 9点之前回答
- 4( )年( )月( )日,我国的俩位宇航员( )和( ),乘坐( )飞上太空,在太空停留了( )小时
- 5脑筋急转弯:怎样用三根筷子搭成比三大比四小的数?
- 6双曲线y=(2m+1)xm的两个分支分别位于第_象限.
- 7干邑白兰地酒V.O,V.S.O,V.S.O.P ,F.O.V,Napoleon,x.o 它们都代表几年?
- 8歌厅有一个圆形表演台,周长43.96米.现在半径加宽1米,比原来的面积增加多少?
- 9已知集合A={x|(x+2)(x+1)(2x-1)>0},B={x|2x^2+ax+b-1≤0},且A∪B={x|x+2>0},A∩B={x|1/2
- 10目前世界上物理学还有哪些问题未解决?最前沿