我的程序: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 i
来源:学生作业帮助网 编辑:作业帮 时间:2024/06/19 22:51:57
![我的程序: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 i](/uploads/image/z/12545803-19-3.jpg?t=%E6%88%91%E7%9A%84%E7%A8%8B%E5%BA%8F%EF%BC%9Aprogram+examimplicit+nonereal+vreal+sqrtopen%282%2Cfile%3D%27F%3A%5C6.txt%27%2Cstatus%3D%27replace%27%29+v%3Dsqrt%284%29write%282%2C%2A%29+vend%E7%BB%93%E6%9E%9C%E5%87%BA%E9%94%99%E6%8F%90%E7%A4%BA%EF%BC%9AError%3AThis+name+does+not+have+a+type%2Cand+must+have+an+explicit+type.%5BSQRT%5DWarning%3AArguments%27+data+types+are+i)
我的程序: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 i
我的程序:
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]
请问怎么调用啊?
Fortran中开根号函数的调用
我的程序: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 i
v=sqrt(4)
改为
v=sqrt(4.0)