作业帮 > 综合 > 作业

Fortran中开根号函数QRST的调用

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/05/16 01:57:57
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 exam
real v
open(2,file='6.txt',status='unknown')
v=sqrt(4.0)
write(2,*) v
close(2)
call system('c:\windows\notepad.exe 6.txt')
end
既然V是real
sqrt(4.0)中间应该是4.0