fortran里有没有能发声的命令？

楚香饭

语法里没有，你可以试试：

[Fortran] 纯文本查看 复制代码

write(*,*) char(7)

或者，如果你使用的是 Intel Fortran ，那么

[Fortran] 纯文本查看 复制代码

USE IFPORT
call beepqq(4000,1000)

楚香饭

你这问题怎么变了？

楚香饭

这个问题需要用到多线程编程。（一个主线程用于大循环，一个子线程用于记时三分钟）

Fortran语法里没有关于多线程的内容。如果你使用的编译器允许使用 CreateThread 这类 API 函数，或者 SetTimer 这类函数你可以试试调用。