fortran中提供计算程序运行时间的功能在哪里呢？？

Profile 工具是由编译器提供的，而不是Fortran语法。

Compaq Visual Fortran 提供 Profile 工具，具体使用方法请参考彭国伦的《Fortran90程序设计》。

如果你的编译器不提供 Profile 工具，也可以使用 CPU_TIME 这些函数。

功能在Profile 工具上。
要输入代码，如下。
子例程 date_and_time 返回实时时钟和日期的相关数据。返回数据包括本地时间以及本地时间与通用协调时间
(Universal Coordinated Time, UTC) 之间的时差，通用协调时间也称为格林威治标准时间 (Greenwich Mean Time,
GMT)。
子例程 date_and_time() 的调用方式如下：

call date_and_time( date , time, zone, values )

date
CHARACTER*8
输出 以 CCYYMMDD 格式表示的日期，其中 CCYY 表示四位数的年份，MM 表示两位数的月份，DD
表示两位数的当月日期。例如：19980709
time CHARACTER*10

输出 以 hhmmss.sss 格式表示的当前时间，其中 hh 表示小时，mm 表示分钟，ss.sss 表示秒和毫秒。
zone
CHARACTER*5 输出 与 UTC 的时差，以小时数和分钟数表示，采用 hhmm
格式。
values INTEGER*4 VALUES(8) 输出 下面介绍的 8
个元素组成的整数数组。

INTEGER*4 values 数组中返回的 8
个值为
VALUES(1) 以 4
位整数表示的年份。例如：1998。
VALUES(2) 以从 1 到 12
的整数表示的月份。
VALUES(3) 以从 1 到 31
的整数表示的当月日期。
VALUES(4) 以分钟数表示的与 UTC
的时差。
VALUES(5) 以从 1 到 23
的整数表示的当天小时时间。
VALUES(6) 以从 1 到 59
的整数表示的一个小时中的分钟时间。
VALUES(7) 以从 0 到 60
的整数表示的一分钟中的秒数。
VALUES(8) 位于范围 0 至 999 中的毫秒数。