问题描述:
Fortran中开根号函数QRST的调用
我的程序:
program examimplicit nonereal vreal sqrtopen(2,file='F:\6.txt',status='replace') v=sqrt(4)write(2,*) vend
结果出错提示:
Error:This name does not have a type,and must have an explicit type.[SQRT]
Warning:Arguments' data types are incompatible with intrinsic procedure,assume EXTERNAL.[SQRT]
请问怎么调用啊?
我的程序:
program examimplicit nonereal vreal sqrtopen(2,file='F:\6.txt',status='replace') v=sqrt(4)write(2,*) vend
结果出错提示:
Error:This name does not have a type,and must have an explicit type.[SQRT]
Warning:Arguments' data types are incompatible with intrinsic procedure,assume EXTERNAL.[SQRT]
请问怎么调用啊?
问题解答:
我来补答展开全文阅读